2005-03-29 Nakagawa, Makoto <Makoto.Nakagawa@hp.com>

	* pgg-pgp.el (pgg-scheme-sign-region): Manually convert line
	endings to CRLF before signing.

diff --git a/ChangeLog b/ChangeLog
index e5fad25..490c8da 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2005-03-29  Nakagawa, Makoto  <Makoto.Nakagawa@hp.com>
+
+       * pgg-pgp.el (pgg-scheme-sign-region): Manually convert line
+       endings to CRLF before signing.
+
 2001-09-24   Daiki Ueno  <ueno@unixuser.org>
 
        * 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 (file)
--- 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