* mml2015.el (mml2015-epg-sign): Prefix "pgp-" to a micalg value.

Reported by Werner Koch <wk@gnupg.org>.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 617df5f..7027e98 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-11-14  Daiki Ueno  <ueno@unixuser.org>
+
+       * mml2015.el (mml2015-epg-sign): Prefix "pgp-" to a micalg value.
+       Reported by Werner Koch <wk@gnupg.org>.
+
 2006-11-14  Daiki Ueno  <ueno@p360>
 
        * mml2015.el: Autoload epa-select-keys when compiling.

diff --git a/lisp/mml2015.el b/lisp/mml2015.el
index f23a343..5339c84 100644 (file)
--- a/lisp/mml2015.el
+++ b/lisp/mml2015.el
@@ -1163,7 +1163,7 @@ If no one is selected, default secret key is used.  "
     (insert (format "Content-Type: multipart/signed; boundary=\"%s\";\n"
                    boundary))
     (if micalg
-       (insert (format "\tmicalg=%s; "
+       (insert (format "\tmicalg=pgp-%s; "
                        (downcase
                         (cdr (assq micalg
                                    epg-digest-algorithm-alist))))))