Commit 02ad7cbf authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(reveal-post-command): Use overlay-get for overlays.

parent 0db701f0
......@@ -95,7 +95,7 @@
(let ((inv (overlay-get ol 'invisible)))
(and inv (symbolp inv)
(or (setq open (or (get inv 'reveal-toggle-invisible)
(get ol 'isearch-open-invisible-temporary)))
(overlay-get ol 'isearch-open-invisible-temporary)))
(overlay-get ol 'isearch-open-invisible)
(and (consp buffer-invisibility-spec)
(assq inv buffer-invisibility-spec)))
......@@ -129,7 +129,7 @@
(if (or open
(and (setq inv (overlay-get ol 'reveal-invisible))
(setq open (or (get inv 'reveal-toggle-invisible)
(get ol 'isearch-open-invisible-temporary)))))
(overlay-get ol 'isearch-open-invisible-temporary)))))
(condition-case err
(funcall open ol t)
(error (message "!!Reveal-hide: %s !!" err)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment