[Emacs-diffs] Changes to emacs/lisp/reveal.el [lexbind]

[Miles Bader]

Index: emacs/lisp/reveal.el
diff -c emacs/lisp/reveal.el:1.6.2.1 emacs/lisp/reveal.el:1.6.2.2
*** emacs/lisp/reveal.el:1.6.2.1        Fri Apr  4 01:20:10 2003
--- emacs/lisp/reveal.el        Tue Oct 14 19:51:22 2003
***************
*** 95,101 ****
                     (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)
                                (and (consp buffer-invisibility-spec)
                                     (assq inv buffer-invisibility-spec)))
--- 95,101 ----
                     (let ((inv (overlay-get ol 'invisible)))
                       (and inv (symbolp inv)
                            (or (setq open (or (get inv 
'reveal-toggle-invisible)
!                                              (overlay-get ol 
'isearch-open-invisible-temporary)))
                                (overlay-get ol 'isearch-open-invisible)
                                (and (consp buffer-invisibility-spec)
                                     (assq inv buffer-invisibility-spec)))
***************
*** 129,135 ****
             (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)))))
                 (condition-case err
                     (funcall open ol t)
                   (error (message "!!Reveal-hide: %s !!" err)))
--- 129,135 ----
             (if (or open
                     (and (setq inv (overlay-get ol 'reveal-invisible))
                          (setq open (or (get inv 'reveal-toggle-invisible)
!                                        (overlay-get ol 
'isearch-open-invisible-temporary)))))
                 (condition-case err
                     (funcall open ol t)
                   (error (message "!!Reveal-hide: %s !!" err)))
***************
*** 171,174 ****
--- 171,175 ----
  
  (provide 'reveal)
  
+ ;;; arch-tag: 96ba0242-2274-4ed7-8e10-26bc0707b4d8
  ;;; reveal.el ends here