diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mh-e/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/mh-e/mh-comp.el | 4 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/mh-e/ChangeLog b/lisp/mh-e/ChangeLog index 8c91b633c6d..ee332fc8186 100644 --- a/lisp/mh-e/ChangeLog +++ b/lisp/mh-e/ChangeLog @@ -1,5 +1,8 @@ 2007-08-20 Jeffrey C Honig <jch@honig.net> + * mh-comp.el (mh-forward): Address SF 1730393. When forwarding + with mml, messages were included in reverse order. + * mh-mime.el (mh-mml-forward-message): Address SF 1378993 and forward messages as inline attatchments. diff --git a/lisp/mh-e/mh-comp.el b/lisp/mh-e/mh-comp.el index b74c445238e..a71de8246c5 100644 --- a/lisp/mh-e/mh-comp.el +++ b/lisp/mh-e/mh-comp.el @@ -497,7 +497,9 @@ See also `mh-compose-forward-as-mime-flag', (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) |