diff options
author | Jeffrey C Honig <jch@bsdi.com> | 2007-08-20 03:05:42 +0000 |
---|---|---|
committer | Jeffrey C Honig <jch@bsdi.com> | 2007-08-20 03:05:42 +0000 |
commit | d59261046372b7f2c7ddf4ab3934ba3a977deff3 (patch) | |
tree | bb3a42ce9224123847b5c1c84cb4ee1d9ce41652 /lisp | |
parent | d7c5b212c91bd7e270471e2c307d0c9338cbb102 (diff) | |
download | emacs-d59261046372b7f2c7ddf4ab3934ba3a977deff3.tar.gz emacs-d59261046372b7f2c7ddf4ab3934ba3a977deff3.tar.bz2 emacs-d59261046372b7f2c7ddf4ab3934ba3a977deff3.zip |
(mh-forward): Address SF 1730393. When forwarding
with mml, messages were included in reverse order.
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) |