Function: preview-disable

preview-disable is a byte-compiled function defined in preview.el.

Signature

(preview-disable OVR)

Documentation

Change overlay behaviour of OVR after source edits.

Source Code

;; Defined in ~/.emacs.d/elpa/auctex-14.2.0/preview.el
(defun preview-disable (ovr)
  "Change overlay behaviour of OVR after source edits."
  (let ((remove-image (or (not preview-keep-stale-images)
                          (eq preview-visibility-style 'off-point))))
    ;; Do not reset queued, a disabled image will be shown anyways.
    ;; More importantly, resetting queued will orphan files if a conversion
    ;; process is underway.
    ;;(overlay-put ovr 'queued nil)
    (preview-remove-urgentization ovr)
    (when remove-image
      (overlay-put ovr 'preview-image nil))
    (overlay-put ovr 'timestamp nil)
    (setcdr (overlay-get ovr 'strings)
            (preview--string
             ovr
             (and remove-image preview-icon)
             "%s regenerates preview\n%s more options"
             (lambda () (interactive) (preview-regenerate ovr))))
    (preview-toggle ovr)
    (when remove-image
      (preview--delete-overlay-files ovr))
    (overlay-put ovr 'preview-state 'disabled)))