lisp/gnus/mml2015.el (mml2015-epg-sign): Make sure to insert newline after the signed...

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 80eaf708bc91fe9d0f36e3cb13fbe6afb8c435eb..6ec0cf56cc044768d1a34ae84cc041418cd38dce 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2013-05-22  Daiki Ueno  <ueno@gnu.org>
+
+       * mml2015.el (mml2015-epg-sign): Make sure to insert newline after the
+       signed data to conform the standard.  (Bug#14232)
+
 2013-05-20  Adam Sjøgren  <asjo@koldfront.dk>
 
        * gnus-spec.el (gnus-parse-complex-format): Use unicode escape for left

diff --git a/lisp/gnus/mml2015.el b/lisp/gnus/mml2015.el
index c3905b88e7b52745e251558db1e984268a8e7578..5d122dfbe404c490c042a838b9112ccad9a203a2 100644 (file)
--- a/lisp/gnus/mml2015.el
+++ b/lisp/gnus/mml2015.el
@@ -1085,6 +1085,10 @@ If no one is selected, default secret key is used.  "
        (epg-context-set-passphrase-callback
         context
         #'mml2015-epg-passphrase-callback))
+    ;; Signed data must end with a newline (RFC 3156, 5).
+    (goto-char (point-max))
+    (unless (bolp)
+      (insert "\n"))
     (condition-case error
        (setq signature (epg-sign-string context (buffer-string) t)
              mml2015-epg-secret-key-id-list nil)