Function: org--make-preview-overlay

org--make-preview-overlay is a byte-compiled function defined in org.el.gz.

Signature

(org--make-preview-overlay BEG END IMAGE &optional IMAGETYPE)

Documentation

Build an overlay between BEG and END using IMAGE file.

Argument IMAGETYPE is the extension of the displayed image, as a string. It defaults to "png".

Source Code

;; Defined in /usr/src/emacs/lisp/org/org.el.gz
(defun org--make-preview-overlay (beg end image &optional imagetype)
  "Build an overlay between BEG and END using IMAGE file.
Argument IMAGETYPE is the extension of the displayed image,
as a string.  It defaults to \"png\"."
  (let ((ov (make-overlay beg end))
	(imagetype (or (intern imagetype) 'png)))
    (overlay-put ov 'org-overlay-type 'org-latex-overlay)
    (overlay-put ov 'evaporate t)
    (overlay-put ov
		 'modification-hooks
		 (list (lambda (o _flag _beg _end &optional _l)
			 (delete-overlay o))))
    (overlay-put ov
		 'display
		 (list 'image :type imagetype :file image :ascent 'center))))