Mercurial > emacs

changeset 95100:c2fcfe84918f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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 6f0d34e037ab
children 6d1eade44f9c
files lisp/mh-e/mh-mime.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
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)