Mercurial > emacs
changeset 50617:9582ab8af8fe
(reveal-post-command): Use overlay-get for overlays.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 16 Apr 2003 16:03:46 +0000 |
| parents | 2e4300c14e95 |
| children | ebecc2b80af6 |
| files | lisp/reveal.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/reveal.el Wed Apr 16 13:50:40 2003 +0000 +++ b/lisp/reveal.el Wed Apr 16 16:03:46 2003 +0000 @@ -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)))