Mercurial > emacs
changeset 15466:5affe3230dfb
(outline-up-heading): Fix error message.
(outline-backward-same-level, outline-forward-same-level): Likewise.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 20 Jun 1996 19:22:11 +0000 |
| parents | d2efb8b0d453 |
| children | 5211a1402647 |
| files | lisp/textmodes/outline.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/outline.el Thu Jun 20 17:30:41 1996 +0000 +++ b/lisp/textmodes/outline.el Thu Jun 20 19:22:11 1996 +0000 @@ -580,7 +580,7 @@ (interactive "p") (outline-back-to-heading) (if (eq (funcall outline-level) 1) - (error "")) + (error "Already at top level of the outline")) (while (and (> (funcall outline-level) 1) (> arg 0) (not (bobp))) @@ -603,7 +603,7 @@ (setq arg (1- arg))) (progn (setq arg 0) - (error "")))))) + (error "No following same-level heading")))))) (defun outline-get-next-sibling () "Move to next heading of the same level, and return point or nil if none." @@ -630,7 +630,7 @@ (setq arg (1- arg))) (progn (setq arg 0) - (error "")))))) + (error "No previous same-level heading")))))) (defun outline-get-last-sibling () "Move to next heading of the same level, and return point or nil if none."