X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mime-edit.el;h=7daa7427325cab57f3f8c2d12b59381543e85664;hb=9eef1fd7e00b4a82e32beeb32437d19099ef8d3b;hp=267efdeb4ecb49f36c78db87d77fd9b9dada3aef;hpb=b61df73959111a6231c773e4ba56094451c324fe;p=elisp%2Fsemi.git diff --git a/mime-edit.el b/mime-edit.el index 267efde..7daa742 100644 --- a/mime-edit.el +++ b/mime-edit.el @@ -602,8 +602,8 @@ If it is not specified for a `major-mode', ;;; @@ optional header fields ;;; -(defcustom mime-edit-insert-user-agent-field t - "*If non-nil, insert User-Agent header field." +(defcustom mime-edit-insert-user-agent-field nil + "*If non-nil, some MUA makes verbose User-Agent header field." :group 'mime-edit :type 'boolean) @@ -2098,10 +2098,6 @@ Content-Description: S/MIME Encrypted Message][base64]]\n") (let ((contype (car ret)) ;Content-Type (encoding (nth 1 ret)) ;Content-Transfer-Encoding ) - ;; Insert User-Agent field - (and mime-edit-insert-user-agent-field - (or (mail-position-on-field "User-Agent") - (insert mime-edit-user-agent-value))) ;; Make primary MIME headers. (or (mail-position-on-field "MIME-Version") (insert mime-edit-mime-version-value))