changeset 74919:c27a32ee3586

(Footnote-insert-footnote): Fix the search of the last footnote when `footnote-spaced-footnotes' is nil.
author Michaël Cadilhac <michael.cadilhac@lrde.org>
date Tue, 26 Dec 2006 20:27:12 +0000
parents c41a1b0f518e
children fa5c8a721d5e
files lisp/mail/footnote.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/footnote.el	Tue Dec 26 18:10:19 2006 +0000
+++ b/lisp/mail/footnote.el	Tue Dec 26 20:27:12 2006 +0000
@@ -501,7 +501,8 @@
 				 (regexp-quote footnote-end-tag)))
 		       nil t)
 		  (unless (beginning-of-line) t))
-		(goto-char (point-max)))))
+		(Footnote-goto-char-point-max)
+		(re-search-backward (concat "^" footnote-section-tag-regexp) nil t))))
     (unless (looking-at "^$")
       (insert "\n"))
     (when (eobp)