Re: Issues sending GPG-signed mails.

[Reiner Steib <reinersteib+gmane@imap.cc>]

Could someone look into this, please?


On Thu, Jul 16 2009, Ashish SHUKLA wrote:

> Gnus v5.13
> GNU Emacs 23.1.50.1 (x86_64-unknown-linux-gnu, GTK+ Version 2.16.2)
>  of 2009-07-13 on chateau.d.lf
> 200 Leafnode NNTP Daemon, version 1.11.6 running at chateau.d.lf (my fqdn: chateau.d.lf)
>
> Hi,
>
> I get this error sometimes, whenever I try to send any GPG-signed mail.
>
> #v+
> Debugger entered--Lisp error: (error "Sign failed")
>   signal(error ("Sign failed"))
>   byte-code("....................." [mml2015-epg-secret-key-id-list error password-cache-remove signal] 4)
>   mml2015-epg-sign((part (sign . "pgpmime") (tag-location . 2217) (contents . "771 character string")))
>   mml2015-sign((part (sign . "pgpmime") (tag-location . 2217) (contents . "771 character string")))
>   mml-pgpmime-sign-buffer((part (sign . "pgpmime") (tag-location . 2217) (contents . "771 character string")))
>   mml-generate-mime-1((part (sign . "pgpmime") (tag-location . 2217) (contents . "771 character string")))
>   mml-generate-mime()
>   message-encode-message-body()
>   gnus-inews-do-gcc()
>   gnus-agent-possibly-do-gcc()
>   run-hooks(message-sent-hook)
>   message-send(nil)
>   message-send-and-exit(nil)
>   call-interactively(message-send-and-exit nil nil)
> #v-
>
> I've masked the mail message and binary byte code in above
> stacktrace. As soon as I press C-c C-c, I'm prompted for my GPG key's
> password and then mail gets sent, and I get this error. If I press C-c
> C-c again in that mail buffer I get this message 'mail already sent.'.
>
> I originally noticed this issue in Emacs 23.0.50.x but before I'm able
> to report in later versions it went away. And now since few days, it
> started to show up again.
>
> This bug is not reproducible everytime but it happens often.
>
> ------------------ Environment follows ------------------
>
> (setq gnus-parameters
> 			'(("\\`nnrss:"
> 				 (mm-discouraged-alternatives nil))))
> (setq gnus-default-nntp-server "")
> (setq gnus-message-archive-group "nnmaildir:sent-mail")
> (setq gnus-secondary-select-methods
> 			'((nnmaildir ""
> 									 (directory "~/mail")
> 									 (get-new-mail t))))
> (setq gnus-summary-prepare-exit-hook
> 			'(spam-summary-prepare-exit gnus-summary-expire-articles))
> (setq gnus-valid-select-methods
> 			'(("nntp" post address prompt-address physical-address)
> 				("nnspool" post address)
> 				("nnvirtual" post-mail virtual prompt-address)
> 				("nnmbox" mail respool address)
> 				("nnml" post-mail respool address)
> 				("nnmh" mail respool address)
> 				("nndir" post-mail prompt-address physical-address)
> 				("nneething" none address prompt-address physical-address)
> 				("nndoc" none address prompt-address)
> 				("nnbabyl" mail address respool)
> 				("nnkiboze" post virtual)
> 				("nnsoup" post-mail address)
> 				("nndraft" post-mail)
> 				("nnfolder" mail respool address)
> 				("nngateway" post-mail address prompt-address physical-address)
> 				("nnweb" none)
> 				("nngoogle" post)
> 				("nnslashdot" post)
> 				("nnultimate" none)
> 				("nnrss" none)
> 				("nnwfm" none)
> 				("nnwarchive" none)
> 				("nnlistserv" none)
> 				("nnagent" post-mail)
> 				("nnimap" post-mail address prompt-address physical-address)
> 				("nnmaildir" mail respool address)
> 				("nnnil" none)
> 				("nnmairix" mail address)))
> (setq gnus-group-change-level-function 'gnus-topic-change-level)
> (setq gnus-default-charset 'utf-8)
> (setq gnus-user-agent
> 			'(emacs gnus config type))
> (setq gnus-summary-mode-hook
> 			'(gnus-agent-mode nnmairix-summary-mode-hook
> 												#[nil "\010?\205\n\000\302	\303\304#\207"
> 															[window-system gnus-summary-mode-map define-key
> 																						 [66 deletechar]
> 																						 gnus-summary-delete-article]
> 															4]))
> (setq gnus-summary-prepare-hook
> 			'(spam-summary-prepare))
> (setq gnus-summary-prepared-hook
> 			'(spam-find-spam))
> (setq gnus-exit-group-hook
> 			'(gnus-uu-delete-work-dir gnus-uu-clean-up))
> (setq gnus-summary-highlight
> 			'(((eq mark gnus-spam-mark)
> 				 . spam)
> 				((eq mark gnus-spam-mark)
> 				 . spam)
> 				((eq mark gnus-canceled-mark)
> 				 . gnus-summary-cancelled)
> 				((and uncached
> 							(> score default-high))
> 				 . gnus-summary-high-undownloaded)
> 				((and uncached
> 							(< score default-low))
> 				 . gnus-summary-low-undownloaded)
> 				(uncached . gnus-summary-normal-undownloaded)
> 				((and
> 					(> score default-high)
> 					(or
> 					 (eq mark gnus-dormant-mark)
> 					 (eq mark gnus-ticked-mark)))
> 				 . gnus-summary-high-ticked)
> 				((and
> 					(< score default-low)
> 					(or
> 					 (eq mark gnus-dormant-mark)
> 					 (eq mark gnus-ticked-mark)))
> 				 . gnus-summary-low-ticked)
> 				((or
> 					(eq mark gnus-dormant-mark)
> 					(eq mark gnus-ticked-mark))
> 				 . gnus-summary-normal-ticked)
> 				((and
> 					(> score default-high)
> 					(eq mark gnus-ancient-mark))
> 				 . gnus-summary-high-ancient)
> 				((and
> 					(< score default-low)
> 					(eq mark gnus-ancient-mark))
> 				 . gnus-summary-low-ancient)
> 				((eq mark gnus-ancient-mark)
> 				 . gnus-summary-normal-ancient)
> 				((and
> 					(> score default-high)
> 					(eq mark gnus-unread-mark))
> 				 . gnus-summary-high-unread)
> 				((and
> 					(< score default-low)
> 					(eq mark gnus-unread-mark))
> 				 . gnus-summary-low-unread)
> 				((eq mark gnus-unread-mark)
> 				 . gnus-summary-normal-unread)
> 				((> score default-high)
> 				 . gnus-summary-high-read)
> 				((< score default-low)
> 				 . gnus-summary-low-read)
> 				(t . gnus-summary-normal-read)))
> (setq gnus-extra-headers
> 			'(X-Spam-Status X-Bogosity X-CRM114-Status To Newsgroups))
> (setq gnus-ignored-from-addresses
> 			'("wahjava\\(\\.ml\\)?@gmail\\.com" "wah\\.java@yahoo\\.com" "wah_java@hotmail\\.com" "ashish\\.shukla@airtelmail\\.in" "ashish\\.shukla@e2enetworks\\.com" "abbe@ipv6\\.fbsd\\.in" "wah_java_dotnet@yahoo\\.com"))
> (setq gnus-group-catchup-group-hook
> 			'(gnus-topic-update-topic))
> (setq gnus-exit-gnus-hook
> 			'(mm-destroy-postponed-undisplay-list))
> (setq gnus-visible-headers "^\\(From:\\|Subject:\\|Date:\\|Followup-To:\\|XNewsreader:\\|To:\\|Cc:\\|Bcc:\\|User-Agent:\\|X-Mailer:\\|Organi[sz]ation:\\|Newsgroups:\\|List-Id:\\|X-Blog-URL:\\|Path:\\)")
> (setq gnus-article-prepare-hook
> 			'(bbdb/gnus-pop-up-bbdb-buffer))
> (setq gnus-buttonized-mime-types
> 			'("multipart/encrypted" "multipart/signed"))
> (setq gnus-check-new-newsgroups nil)
> (setq gnus-startup-hook
> 			'(spam-maybe-spam-stat-load bbdb-insinuate-gnus))
> (setq gnus-setup-news-hook
> 			'(gnus-agent-queue-setup gnus-fixup-nnimap-unread-after-getting-new-news))
> (setq gnus-get-top-new-news-hook
> 			'(spam-maybe-spam-stat-load))
> (setq gnus-get-new-news-hook
> 			'(spam-setup-widening))
> (setq gnus-save-newsrc-hook
> 			'(bbdb-offer-save spam-maybe-spam-stat-save))
> (setq gnus-group-mode-hook
> 			'(gnus-agent-mode gnus-topic-mode nnmairix-group-mode-hook))
> (setq gnus-posting-styles
> 			'((".*"
> 				 ("From" "wahjava@gmail.com (Ashish SHUKLA)")
> 				 ("Organization" "alt.religion.emacs")
> 				 ("Organisation" "alt.religion.emacs")
> 				 ("X-OpenPGP-Fingerprint" "1E00 4679 77E4 F8EE 2E4B 56F2 1F2F 8410 762E 5E74")
> 				 ("X-OpenPGP-ID" "762E5E74")
> 				 ("X-Attribution" "आशीष")
> 				 ("X-Mail-Morse" ".-- .- .... .--- .- ...- .- .--.-. --. -- .- .. .-.. .-.-.- -.-. --- --")
> 				 ("X-URL" "http://762e5e74.wordpress.com/")
> 				 ("X-OS" "GNU/Linux on Linux 2.6.30-ARCH kernel on x86_64 architecture")
> 				 ("X-Uptime"
> 					(chomp
> 					 (shell-command-to-string "uptime")))
> 				 ("X-Mailer"
> 					(gnus-version))
> 				 (signature-file "~/.signature"))
> 				("mailing-lists[.].*"
> 				 ("From" "wahjava.ml@gmail.com (Ashish SHUKLA)")
> 				 (signature
> 					(fortune-to-signature)))
> 				("e2e-.*"
> 				 ("From" "ashish.shukla@e2enetworks.com (Ashish SHUKLA)")
> 				 ("Organization" "E2E Networks")
> 				 ("Organisation" "E2E Networks")
> 				 (signature
> 					(fortune-to-signature)))))
> (setq gnus-global-score-files
> 			'("global.SCORE"))
> (setq gnus-buffer-configuration
> 			'((group
> 				 (group 1.0 point))
> 				(summary
> 				 (horizontal 1.0
> 										 (group 0.3)
> 										 (summary 1.0 point)))
> 				(article
> 				 (horizontal 1.0
> 										 (group 0.3)
> 										 (vertical 1.0
> 															 (summary 0.4 point)
> 															 (article 1.0))))
> 				(server
> 				 (vertical 1.0
> 									 (server 1.0 point)
> 									 (if gnus-carpal
> 											 '(server-carpal 2))))
> 				(browse
> 				 (vertical 1.0
> 									 (browse 1.0 point)
> 									 (if gnus-carpal
> 											 '(browse-carpal 2))))
> 				(message
> 				 (vertical 1.0
> 									 (message 1.0 point)))
> 				(pick
> 				 (vertical 1.0
> 									 (article 1.0 point)))
> 				(info
> 				 (vertical 1.0
> 									 (info 1.0 point)))
> 				(summary-faq
> 				 (vertical 1.0
> 									 (summary 0.25)
> 									 (faq 1.0 point)))
> 				(edit-article
> 				 (vertical 1.0
> 									 (article 1.0 point)))
> 				(edit-form
> 				 (vertical 1.0
> 									 (group 0.5)
> 									 (edit-form 1.0 point)))
> 				(edit-score
> 				 (vertical 1.0
> 									 (summary 0.25)
> 									 (edit-score 1.0 point)))
> 				(edit-server
> 				 (vertical 1.0
> 									 (server 0.5)
> 									 (edit-form 1.0 point)))
> 				(post
> 				 (vertical 1.0
> 									 (post 1.0 point)))
> 				(reply
> 				 (vertical 1.0
> 									 (article 0.5)
> 									 (message 1.0 point)))
> 				(forward
> 				 (vertical 1.0
> 									 (message 1.0 point)))
> 				(reply-yank
> 				 (vertical 1.0
> 									 (message 1.0 point)))
> 				(mail-bounce
> 				 (vertical 1.0
> 									 (article 0.5)
> 									 (message 1.0 point)))
> 				(pipe
> 				 (vertical 1.0
> 									 (summary 0.25 point)
> 									 (if gnus-carpal
> 											 '(summary-carpal 4))
> 									 ("*Shell Command Output*" 1.0)))
> 				(bug
> 				 (vertical 1.0
> 									 (if gnus-bug-create-help-buffer
> 											 '("*Gnus Help Bug*" 0.5))
> 									 ("*Gnus Bug*" 1.0 point)))
> 				(score-trace
> 				 (vertical 1.0
> 									 (summary 0.5 point)
> 									 ("*Score Trace*" 1.0)))
> 				(score-words
> 				 (vertical 1.0
> 									 (summary 0.5 point)
> 									 ("*Score Words*" 1.0)))
> 				(split-trace
> 				 (vertical 1.0
> 									 (summary 0.5 point)
> 									 ("*Split Trace*" 1.0)))
> 				(category
> 				 (vertical 1.0
> 									 (category 1.0)))
> 				(compose-bounce
> 				 (vertical 1.0
> 									 (article 0.5)
> 									 (message 1.0 point)))
> 				(display-term
> 				 (vertical 1.0
> 									 ("*display*" 1.0)))
> 				(mml-preview
> 				 (vertical 1.0
> 									 (message 0.5)
> 									 (mml-preview 1.0 point)))))
> (setq gnus-server-mode-hook
> 			'(gnus-agent-mode))
> (setq mm-charset-synonym-alist
> 			'((ibm866 . cp866)
> 				(unicode . utf-16-le)
> 				(ks_c_5601-1987 . cp949)
> 				(windows-31j . cp932)
> 				(utf8 . utf-8)
> 				(iso8859-1 . iso-8859-1)
> 				(iso_8859-1 . iso-8859-1)))
> (setq mm-coding-system-priorities
> 			'(utf-8))
> (setq mm-inline-text-html-with-images t)
> (setq mm-inline-text-html-with-w3m-keymap nil)
> (setq mm-inline-media-tests
> 			'(("application/pgp$" mm-inline-text identity)
> 				("image/p?jpeg" mm-inline-image
> 				 (lambda
> 					 (handle)
> 					 (mm-valid-and-fit-image-p 'jpeg handle)))
> 				("image/png" mm-inline-image
> 				 (lambda
> 					 (handle)
> 					 (mm-valid-and-fit-image-p 'png handle)))
> 				("image/gif" mm-inline-image
> 				 (lambda
> 					 (handle)
> 					 (mm-valid-and-fit-image-p 'gif handle)))
> 				("image/tiff" mm-inline-image
> 				 (lambda
> 					 (handle)
> 					 (mm-valid-and-fit-image-p 'tiff handle)))
> 				("image/xbm" mm-inline-image
> 				 (lambda
> 					 (handle)
> 					 (mm-valid-and-fit-image-p 'xbm handle)))
> 				("image/x-xbitmap" mm-inline-image
> 				 (lambda
> 					 (handle)
> 					 (mm-valid-and-fit-image-p 'xbm handle)))
> 				("image/xpm" mm-inline-image
> 				 (lambda
> 					 (handle)
> 					 (mm-valid-and-fit-image-p 'xpm handle)))
> 				("image/x-xpixmap" mm-inline-image
> 				 (lambda
> 					 (handle)
> 					 (mm-valid-and-fit-image-p 'xpm handle)))
> 				("image/bmp" mm-inline-image
> 				 (lambda
> 					 (handle)
> 					 (mm-valid-and-fit-image-p 'bmp handle)))
> 				("image/x-portable-bitmap" mm-inline-image
> 				 (lambda
> 					 (handle)
> 					 (mm-valid-and-fit-image-p 'pbm handle)))
> 				("text/plain" mm-inline-text identity)
> 				("text/enriched" mm-inline-text identity)
> 				("text/richtext" mm-inline-text identity)
> 				("text/x-patch" mm-display-patch-inline
> 				 (lambda
> 					 (handle)
> 					 (fboundp 'diff-mode)))
> 				("text/x-diff" mm-display-patch-inline
> 				 (lambda
> 					 (handle)
> 					 (fboundp 'diff-mode)))
> 				("application/emacs-lisp" mm-display-elisp-inline identity)
> 				("application/x-emacs-lisp" mm-display-elisp-inline identity)
> 				("text/dns" mm-display-dns-inline identity)
> 				("text/html" mm-inline-text-html
> 				 (lambda
> 					 (handle)
> 					 (or mm-inline-text-html-renderer mm-text-html-renderer)))
> 				("text/x-vcard" mm-inline-text-vcard
> 				 (lambda
> 					 (handle)
> 					 (or
> 						(featurep 'vcard)
> 						(locate-library "vcard"))))
> 				("message/delivery-status" mm-inline-text identity)
> 				("message/rfc822" mm-inline-message identity)
> 				("message/partial" mm-inline-partial identity)
> 				("message/external-body" mm-inline-external-body identity)
> 				("text/.*" mm-inline-text identity)
> 				("audio/wav" mm-inline-audio
> 				 (lambda
> 					 (handle)
> 					 (and
> 						(or
> 						 (featurep 'nas-sound)
> 						 (featurep 'native-sound))
> 						(device-sound-enabled-p))))
> 				("audio/au" mm-inline-audio
> 				 (lambda
> 					 (handle)
> 					 (and
> 						(or
> 						 (featurep 'nas-sound)
> 						 (featurep 'native-sound))
> 						(device-sound-enabled-p))))
> 				("application/pgp-signature" ignore identity)
> 				("application/x-pkcs7-signature" ignore identity)
> 				("application/pkcs7-signature" ignore identity)
> 				("application/x-pkcs7-mime" ignore identity)
> 				("application/pkcs7-mime" ignore identity)
> 				("multipart/alternative" ignore identity)
> 				("multipart/mixed" ignore identity)
> 				("multipart/related" ignore identity)
> 				("audio/.*" ignore ignore)
> 				("image/.*" ignore ignore)
> 				(".*" mm-inline-text mm-readable-p)))
> (setq mm-inlined-types
> 			'("application/pgp$" "image/.*" "text/.*" "message/delivery-status" "message/rfc822" "message/partial" "message/external-body" "application/emacs-lisp" "application/x-emacs-lisp" "application/pgp-signature" "application/x-pkcs7-signature" "application/pkcs7-signature" "application/x-pkcs7-mime" "application/pkcs7-mime" "application/pgp"))
> (setq mm-automatic-display
> 			'("application/pgp$" "text/plain" "text/enriched" "text/richtext" "text/html" "text/x-verbatim" "text/x-vcard" "image/.*" "message/delivery-status" "multipart/.*" "message/rfc822" "text/x-patch" "text/dns" "application/emacs-lisp" "application/x-emacs-lisp" "application/x-pkcs7-signature" "application/pkcs7-signature" "application/x-pkcs7-mime" "application/pkcs7-mime" "application/pgp\\'"))
> (setq mm-discouraged-alternatives
> 			'("text/html" "image/.*"))
> (setq nnmail-split-methods
> 			'(("mailing-lists.libre-fm" "^List-Id:.*libre-fm[.]lists[.]autonomo[.]us$")
> 				("mailing-lists.cedet-devel" "^List-Id:.*cedet-devel[.]lists[.]sourceforge[.]net$")
> 				("mailing-lists.freebsd-haskell" "^List-Id:.*freebsd-haskell[.]haskell[.]org$")
> 				("mailing-lists.haskell" "^List-Id:.*<haskell.haskell.org>$")
> 				("mailing-lists.arch-general" "^List-Id:.*<arch-general.archlinux.org>$")
> 				("mailing-lists.emacs-devel" "^List-Id:.*<emacs-devel.gnu.org>$")
> 				("mailing-lists.discuss-opennic" "^List-Id:.*<discuss.lists.opennicproject.org>$")
> 				("mailing-lists.debian-devel-announce" "^List-Id:.*<debian-devel-announce.lists.debian.org>$")
> 				("mailing-lists.info-fsf" "^List-Id:.*<info-fsf.gnu.org>$")
> 				("mailing-lists.vuhams" "^List-Id:.*<vuhams.yahoogroups.com>$")
> 				("mailing-lists.freebsd-current" "^List-Id:.*<freebsd-current.freebsd.org>$")
> 				("mailing-lists.freebsd-announce" "^List-Id:.*<freebsd-announce.freebsd.org>$")
> 				("mailing-lists.freebsd-hackers" "^List-Id:.*<freebsd-hackers.freebsd.org>$")
> 				("mailing-lists.gentoo-user" "^List-Id:.*<gentoo-user.gentoo.org>$")
> 				("mailing-lists.gentoo-hardened" "^List-Id:.*<gentoo-hardened.gentoo.org>$")
> 				("mailing-lists.radiobsd" "^List-Id:.*<radiobsd.googlegroups.com>$")
> 				("mailing-lists.drbd-user" "^List-Id:.*<drbd-user.lists.linbit.com>$")
> 				("mailing-lists.freebsd-x11" "^List-Id:.*<freebsd-x11.freebsd.org>$")
> 				("mailing-lists.freebsd-net" "^List-Id:.*<freebsd-net.freebsd.org>$")
> 				("mailing-lists.freebsd-mobile" "^List-Id:.*<freebsd-mobile.freebsd.org>$")
> 				("mailing-lists.freebsd-stable" "^List-Id:.*<freebsd-stable.freebsd.org>$")
> 				("mailing-lists.freebsd-multimedia" "^List-Id:.*<freebsd-multimedia.freebsd.org>$")
> 				("mailing-lists.freebsd-questions" "^List-Id:.*<freebsd-questions.freebsd.org>$")
> 				("mailing-lists.freebsd-gnome" "^List-Id:.*<freebsd-gnome.freebsd.org>$")
> 				("mailing-lists.freebsd-ports-bugs" "^List-Id:.*<freebsd-ports-bugs.freebsd.org>$")
> 				("mailing-lists.freebsd-ports" "^List-Id:.*<freebsd-ports.freebsd.org>$")
> 				("mailing-lists.free-software-laptop" "^List-Id:.*<free-software-laptop.lists.ubuntu.com>$")
> 				("mailing-lists.xcb" "^List-Id:.*xcb.lists.freedesktop.org.*$")
> 				("mailing-lists.india-isp" "^List-Id:.*<india-isp.lists.dhoomketu.net.in>$")
> 				("mailing-lists.bsd-india" "^List-Id:.*<bsd-india.bsd-india.org>$")
> 				("mailing-lists.netutils-dev" "^List-Id:.*netutils-dev.nongnu.org.*$")
> 				("mailing-lists.delhi-pm" "^List-Id:.*<delhi-pm.pm.org>$")
> 				("spam" "^X-Spam-Flag: YES")
> 				("sent-mail" "^From:.*wahjava\\(?:.ml\\)?@gmail[.]com")
> 				("sent-mail" "^From:.*ashish\\.shukla@e2enetworks[.]com")
> 				("e2e-inbox" "^\\(To\\|Cc\\):.*ashish[.]shukla@e2enetworks[.]com")
> 				("sent-mail" "^From:.*wahjava@\\(?:members?[.]fsf[.]org\\|users[.]sourceforge[.]net\\)")
> 				("inbox" "")))
> (setq nnmail-extra-headers
> 			'(X-Spam-Status X-Bogosity X-CRM114-Status To Newsgroups))
> (setq message-required-headers
> 			'((X-Draft-From lambda nil
> 											(gnus-inews-make-draft-meta-information "nnmaildir:e2e-inbox" 'nil))
> 				(optional . References)
> 				From))
> (setq message-required-news-headers
> 			'(From Subject Date
> 						 (optional . In-Reply-To)
> 						 Message-ID
> 						 (optional . User-Agent)
> 						 (Face lambda nil
> 									 (gnus-convert-png-to-face "~/.face.png"))))
> (setq message-required-mail-headers
> 			'(From Subject Date
> 						 (optional . In-Reply-To)
> 						 Message-ID
> 						 (optional . User-Agent)
> 						 (Face lambda nil
> 									 (gnus-convert-png-to-face "~/.face.png"))))
> (setq message-send-mail-function 'message-smtpmail-send-it)
> (setq message-setup-hook
> 			'(bbdb-insinuate-message))
> (setq message-mode-hook
> 			'(#[nil "\302\030\303	!)\207"
> 							[gnus-article-copy gnus-setup-message-group nil gnus-configure-posting-styles]
> 							2]
> 				#[nil "\302 \211\020\211\021\207"
> 							[message-mailer message-newsreader gnus-extended-version]
> 							2]
> 				footnote-mode))
> (setq message-header-setup-hook
> 			'(gnus-inews-insert-archive-gcc gnus-inews-insert-gcc))
> (setq message-cite-function 'sc-cite-original)
> (setq message-signature "You are always busy.\n")
> (setq message-default-headers "X-Face: )vGQ9yK7Y$Flebu1C>(B\\gYBm)[$zfKM+p&TT[[JWl6:]S>cc$%-z7-`46Zf0B*syL.C]oCq[upTG~zuS0.$\"_%)|Q@$hA=9{3l{%u^h3jJ^Zl;t7")
>
>
>
>
> Thanks
> Ashish SHUKLA