(Footnote-insert-footnote): Fix the search of the last footnote when

`footnote-spaced-footnotes' is nil.

2 files changed, 7 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fb34edb883e..68cc10cfd94 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-12-26  Micha,Ak(Bl Cadilhac  <michael.cadilhac@lrde.org>
+
+        * mail/footnote.el (Footnote-insert-footnote): Fix the search of the
+        last footnote when `footnote-spaced-footnotes' is nil.
+
 2006-12-26  Richard Stallman  <rms@gnu.org>
 
         * image.el (image-type-header-regexps): Change element format
diff --git a/lisp/mail/footnote.el b/lisp/mail/footnote.el
index da7e5fcf579..b2374490026 100644
--- a/lisp/mail/footnote.el
+++ b/lisp/mail/footnote.el
@@ -501,7 +501,8 @@ styles."
                                  (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)