[Emacs-diffs] Changes to emacs/lisp/mh-e/mh-mime.el [lexbind]

[Miles Bader]

Index: emacs/lisp/mh-e/mh-mime.el
diff -c emacs/lisp/mh-e/mh-mime.el:1.2.4.4 emacs/lisp/mh-e/mh-mime.el:1.2.4.5
*** emacs/lisp/mh-e/mh-mime.el:1.2.4.4  Sat Sep  4 09:22:56 2004
--- emacs/lisp/mh-e/mh-mime.el  Sat Sep  4 09:26:23 2004
***************
*** 583,588 ****
--- 583,590 ----
      (mml-insert-empty-tag 'part 'type type 'filename file
                            'disposition dispos 'description description)))
  
+ (defvar mh-identity-pgg-default-user-id)
+ 
  (defun mh-secure-message (method mode &optional identity)
    "Add directive to Encrypt/Sign an entire message.
  METHOD should be one of: \"pgpmime\", \"pgp\", \"smime\".
***************
*** 850,855 ****
--- 852,865 ----
                          (car ct))))))
  
  ;;;###mh-autoload
+ (defun mh-toggle-mh-decode-mime-flag ()
+   "Toggle whether MH-E should decode MIME or not."
+   (interactive)
+   (setq mh-decode-mime-flag (not mh-decode-mime-flag))
+   (mh-show nil t)
+   (message (format "(setq mh-decode-mime-flag %s)" mh-decode-mime-flag)))
+ 
+ ;;;###mh-autoload
  (defun mh-decode-message-header ()
    "Decode RFC2047 encoded message header fields."
    (when mh-decode-mime-flag