Mercurial > emacs
diff lisp/mh-e/mh-mime.el @ 95100:c2fcfe84918f
(mh-mh-to-mime, mh-mh-to-mime-undo): Preserve modes when converting to
or from MIME (closes SF #1966722).
author | Bill Wohler <wohler@newt.com> |
---|---|
date | Mon, 19 May 2008 04:12:32 +0000 |
parents | 90c9ebd43589 |
children | a9dc0e7c3f2b |
line wrap: on
line diff
--- a/lisp/mh-e/mh-mime.el Mon May 19 03:04:23 2008 +0000 +++ b/lisp/mh-e/mh-mime.el Mon May 19 04:12:32 2008 +0000 @@ -1485,7 +1485,7 @@ "mhn" (if extra-args mh-mh-to-mime-args) buffer-file-name))) - (revert-buffer t t) + (revert-buffer t t t) (message "Running %s...done" (if (mh-variant-p 'nmh) "mhbuild" "mhn")) (run-hooks 'mh-mh-to-mime-hook)) @@ -1531,7 +1531,7 @@ (let ((buffer-read-only nil)) (erase-buffer) (insert-file-contents backup-file)) - (after-find-file nil))) + (after-find-file nil nil nil nil t))) ;; Shush compiler. (defvar mh-identity-pgg-default-user-id)