diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2003-04-16 16:03:46 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2003-04-16 16:03:46 +0000 |
| commit | 02ad7cbf43217841ee88ed0c6ff74876ef50a5be (patch) | |
| tree | 281e5b1d4e03167704084d52f4508aa760b60ccf /lisp/reveal.el | |
| parent | 0db701f029fd4cb6db4305bc8e2182ae1329ff6e (diff) | |
| download | emacs-02ad7cbf43217841ee88ed0c6ff74876ef50a5be.tar.gz | |
(reveal-post-command): Use overlay-get for overlays.
Diffstat (limited to 'lisp/reveal.el')
| -rw-r--r-- | lisp/reveal.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/reveal.el b/lisp/reveal.el index 88082c17621..11f8c11c936 100644 --- a/lisp/reveal.el +++ b/lisp/reveal.el @@ -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))) |