andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(mh-forward): Address SF 1730393. When forwarding

Browse source 
with mml, messages were included in reverse order.
This commit is contained in:
Jeffrey C Honig 2007-08-20 03:05:42 +00:00
parent d7c5b212c9
commit d592610463
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/mh-e/ChangeLog
View file

@ -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.

4
lisp/mh-e/mh-comp.el
View file

@ -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)