Mercurial > emacs

changeset 82478:6cd0b704b471

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mh-forward): Address SF 1730393. When forwarding with mml, messages were included in reverse order.
author Jeffrey C Honig <jch@bsdi.com>
date Mon, 20 Aug 2007 03:05:33 +0000
parents ebf88bc5dbf7
children 224e34545cea
files lisp/mh-e/mh-comp.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mh-e/mh-comp.el	Mon Aug 20 02:32:54 2007 +0000
+++ b/lisp/mh-e/mh-comp.el	Mon Aug 20 03:05:33 2007 +0000
@@ -497,7 +497,9 @@
                   (dolist (msg msgs)
                     (setq i (1+ i))
                     (mh-mml-forward-message (format description i)
-                                            folder msg))))))
+                                            folder msg)
+                    ;; Was inserted before us, move to end of file to preserve order
+                    (goto-char (point-max)))))))
         ;; Postition just before forwarded message
         (if (re-search-forward "^------- Forwarded Message" nil t)
             (forward-line -1)