Mercurial > emacs
changeset 57751:d2b6a6d18cc9
(elide-head): Change error to message.
(elide-head-show): Likewise.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 27 Oct 2004 17:48:14 +0000 |
| parents | 5d7aec33a1ba |
| children | d0dbcba62472 |
| files | lisp/elide-head.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/elide-head.el Wed Oct 27 17:46:33 2004 +0000 +++ b/lisp/elide-head.el Wed Oct 27 17:48:14 2004 +0000 @@ -98,7 +98,7 @@ (if rest (setq rest (cdr rest)))) (if (not (and beg end)) (if (interactive-p) - (error "No header found")) + (message "No header found")) (goto-char beg) (end-of-line) (if (overlayp elide-head-overlay) @@ -115,7 +115,7 @@ (overlay-buffer elide-head-overlay)) (delete-overlay elide-head-overlay) (if (interactive-p) - (error "No header hidden")))) + (message "No header hidden")))) (provide 'elide-head)