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

diff --git a/lisp/reveal.el b/lisp/reveal.el
index 88082c176217b5a5395cd1f1671bcb2adba5d3fd..11f8c11c936e33dfe650f6b6e7cf2d5fb7535b4e 100644 (file)
--- 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)))