# HG changeset patch
# User Micha¸«³l Cadilhac <michael.cadilhac@lrde.org>
# Date 1167164832 0
# Node ID c27a32ee3586f56b4d62f78ec8bf1bf330c4f069
# Parent  c41a1b0f518e0ac4b27db93dc6f4194a90d6b543
(Footnote-insert-footnote): Fix the search of the last footnote when
`footnote-spaced-footnotes' is nil.

diff -r c41a1b0f518e -r c27a32ee3586 lisp/mail/footnote.el
--- 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)