changeset 20426:f3debcf1d078

(outline-next-preface): Don't try to move back if already at beginning of buffer.
author Karl Heuer <kwzh@gnu.org>
date Sun, 07 Dec 1997 21:49:09 +0000
parents 6bbf4a411f07
children 1b4f02e638b8
files lisp/textmodes/outline.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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 ()