[Emacs-diffs] Changes to emacs/lisp/elide-head.el

[Richard M . Stallman]

Index: emacs/lisp/elide-head.el
diff -c emacs/lisp/elide-head.el:1.12 emacs/lisp/elide-head.el:1.13
*** emacs/lisp/elide-head.el:1.12       Mon Sep  1 15:45:11 2003
--- emacs/lisp/elide-head.el    Wed Oct 27 17:48:14 2004
***************
*** 98,104 ****
            (if rest (setq rest (cdr rest))))
          (if (not (and beg end))
              (if (interactive-p)
!                 (error "No header found"))
            (goto-char beg)
            (end-of-line)
            (if (overlayp elide-head-overlay)
--- 98,104 ----
            (if rest (setq rest (cdr rest))))
          (if (not (and beg end))
              (if (interactive-p)
!                 (message "No header found"))
            (goto-char beg)
            (end-of-line)
            (if (overlayp elide-head-overlay)
***************
*** 115,121 ****
           (overlay-buffer elide-head-overlay))
        (delete-overlay elide-head-overlay)
      (if (interactive-p)
!       (error "No header hidden"))))
  
  (provide 'elide-head)
  
--- 115,121 ----
           (overlay-buffer elide-head-overlay))
        (delete-overlay elide-head-overlay)
      (if (interactive-p)
!       (message "No header hidden"))))
  
  (provide 'elide-head)