From 4bedbfeec63d11acb1d0957225030643cfa5b9a3 Mon Sep 17 00:00:00 2001 From: ueno Date: Tue, 10 May 2005 07:24:17 +0000 Subject: [PATCH] 2005-03-29 Nakagawa, Makoto * pgg-pgp.el (pgg-scheme-sign-region): Manually convert line endings to CRLF before signing. --- ChangeLog | 5 +++++ pgg-pgp.el | 5 +++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index e5fad25..490c8da 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2005-03-29 Nakagawa, Makoto + + * pgg-pgp.el (pgg-scheme-sign-region): Manually convert line + endings to CRLF before signing. + 2001-09-24 Daiki Ueno * mime-view.el (mime-preview-toggle-display): When both "type" and diff --git a/pgg-pgp.el b/pgg-pgp.el index a99bdbd..58a154e 100644 --- a/pgg-pgp.el +++ b/pgg-pgp.el @@ -171,10 +171,11 @@ Bourne shell or its equivalent \(not tcsh) is needed for \"2>\"." (format "PGP passphrase for %s: " pgg-pgp-user-id) (pgg-scheme-lookup-key scheme pgg-pgp-user-id 'sign))) (args - (list (if clearsign "-fast" "-fbast") + (list (if clearsign "-fast" "-fbas") "+verbose=1" "+language=us" "+batchmode" "-u" pgg-pgp-user-id))) - (pgg-pgp-process-region start end passphrase pgg-pgp-program args) + (pgg-as-lbt start end 'CRLF + (pgg-pgp-process-region start end passphrase pgg-pgp-program args)) (pgg-process-when-success (goto-char (point-min)) (when (re-search-forward "^-+BEGIN PGP" nil t);XXX -- 1.7.10.4