/[emacs]/emacs/lisp/mh-e/mh-mime.el
ViewVC logotype

Diff of /emacs/lisp/mh-e/mh-mime.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2.4.4 by miles, Sat Sep 4 09:22:56 2004 UTC revision 1.2.4.5 by miles, Sat Sep 4 09:26:23 2004 UTC
# Line 583  automatically." Line 583  automatically."
583      (mml-insert-empty-tag 'part 'type type 'filename file      (mml-insert-empty-tag 'part 'type type 'filename file
584                            'disposition dispos 'description description)))                            'disposition dispos 'description description)))
585    
586    (defvar mh-identity-pgg-default-user-id)
587    
588  (defun mh-secure-message (method mode &optional identity)  (defun mh-secure-message (method mode &optional identity)
589    "Add directive to Encrypt/Sign an entire message.    "Add directive to Encrypt/Sign an entire message.
590  METHOD should be one of: \"pgpmime\", \"pgp\", \"smime\".  METHOD should be one of: \"pgpmime\", \"pgp\", \"smime\".
# Line 850  If message has been encoded for transfer Line 852  If message has been encoded for transfer
852                          (car ct))))))                          (car ct))))))
853    
854  ;;;###mh-autoload  ;;;###mh-autoload
855    (defun mh-toggle-mh-decode-mime-flag ()
856      "Toggle whether MH-E should decode MIME or not."
857      (interactive)
858      (setq mh-decode-mime-flag (not mh-decode-mime-flag))
859      (mh-show nil t)
860      (message (format "(setq mh-decode-mime-flag %s)" mh-decode-mime-flag)))
861    
862    ;;;###mh-autoload
863  (defun mh-decode-message-header ()  (defun mh-decode-message-header ()
864    "Decode RFC2047 encoded message header fields."    "Decode RFC2047 encoded message header fields."
865    (when mh-decode-mime-flag    (when mh-decode-mime-flag

Legend:
Removed from v.1.2.4.4  
changed lines
  Added in v.1.2.4.5

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26