From 3c92252561c661c6c672aa7b4c9f2921627a2c37 Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Wed, 31 Oct 2001 01:44:52 +0000 Subject: [PATCH] 2001-10-30 20:00:00 ShengHuo ZHU * mml2015.el (mml2015-gpg-verify): Convert to . --- lisp/ChangeLog | 4 ++++ lisp/mml2015.el | 10 ++++++++++ 2 files changed, 14 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index deca2ec7b..f0c7ba72e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2001-10-30 20:00:00 ShengHuo ZHU + + * mml2015.el (mml2015-gpg-verify): Convert to . + 2001-10-30 13:00:00 ShengHuo ZHU * gnus-spec.el (gnus-parse-simple-format): Use diff --git a/lisp/mml2015.el b/lisp/mml2015.el index c52f888d2..5989e3f8a 100644 --- a/lisp/mml2015.el +++ b/lisp/mml2015.el @@ -444,6 +444,16 @@ by you.") (with-temp-buffer (setq message (current-buffer)) (insert part) + ;; Convert to in verify mode. Sign and + ;; clearsign use --textmode. The conversion is not necessary. + ;; In clearverify, the conversion is not necessary either. + (goto-char (point-min)) + (end-of-line) + (while (not (eobp)) + (unless (eq (char-before) ?\r) + (insert "\r")) + (forward-line) + (end-of-line)) (with-temp-buffer (setq signature (current-buffer)) (unless (setq part (mm-find-part-by-type -- 2.25.1