From 30857a614a4dd26c6f20d45d51694dec60260ce8 Mon Sep 17 00:00:00 2001 From: Luc Teirlinck Date: Wed, 29 Sep 2004 22:23:43 +0000 Subject: [PATCH] (forward-paragraph): Avoid args-out-of-range error when point winds up at the beginning of the buffer and hard newlines are enabled. --- lisp/ChangeLog | 4 ++++ lisp/textmodes/paragraphs.el | 5 +++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e443b47323d..0ed8630d850 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,9 @@ 2004-09-29 Luc Teirlinck + * textmodes/paragraphs.el (forward-paragraph): Avoid + args-out-of-range error when point winds up at the beginning of + the buffer and hard newlines are enabled. + * newcomment.el (comment-multi-line): Doc fix. 2004-09-29 Stefan Monnier diff --git a/lisp/textmodes/paragraphs.el b/lisp/textmodes/paragraphs.el index e5f38971e40..868dcb2d107 100644 --- a/lisp/textmodes/paragraphs.el +++ b/lisp/textmodes/paragraphs.el @@ -274,8 +274,9 @@ Returns the count of paragraphs left to move." (not (looking-at parsep))) (not (and (looking-at parstart) (or (not use-hard-newlines) - (get-text-property (1- start) 'hard) - (bobp))))) + (bobp) + (get-text-property + (1- start) 'hard))))) (setq found-start nil) (goto-char start)) found-start) -- 2.39.2