X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fmml2015.el;h=ef2fe9f5d79a1fb3242d59b0840049aaaf7baf47;hb=809bf94069b502dea6253604c1987656bf64de19;hp=7a4d763625cea909728cc4dedbd947d0b9fce59c;hpb=9ace9cd9af96278359dc6d3606c542be3d30f318;p=elisp%2Fgnus.git-

diff --git a/lisp/mml2015.el b/lisp/mml2015.el
index 7a4d763..ef2fe9f 100644
--- a/lisp/mml2015.el
+++ b/lisp/mml2015.el
@@ -808,7 +808,7 @@
 (defun mml2015-pgg-sign (cont)
   (let ((pgg-errors-buffer mml2015-result-buffer)
 	(boundary (funcall mml-boundary-function (incf mml-multipart-number)))
-	(pgg-default-user-id (or (message-options-get 'message-sender)
+	(pgg-default-user-id (or (message-options-get 'mml-sender)
 				 pgg-default-user-id)))
     (unless (pgg-sign-region (point-min) (point-max))
       (pop-to-buffer mml2015-result-buffer)