# HG changeset patch # User Karl Heuer # Date 881531349 0 # Node ID f3debcf1d0787ad0183bc46f36e5daaee39c898c # Parent 6bbf4a411f0769120bc336f1522170d88e5af200 (outline-next-preface): Don't try to move back if already at beginning of buffer. diff -r 6bbf4a411f07 -r f3debcf1d078 lisp/textmodes/outline.el --- a/lisp/textmodes/outline.el Sun Dec 07 21:40:41 1997 +0000 +++ b/lisp/textmodes/outline.el Sun Dec 07 21:49:09 1997 +0000 @@ -309,7 +309,7 @@ (if (re-search-forward (concat "\n\\(" outline-regexp "\\)") nil 'move) (goto-char (match-beginning 0))) - (if (bolp) + (if (and (bolp) (not (bobp))) (forward-char -1))) (defun outline-next-heading ()