From cd271ae8b5c99475a627a169874457c75e07f957 Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Tue, 9 Nov 1999 03:26:10 +0000
Subject: [PATCH] * mime-pgp.el (mime-verify-application/pgp-signature): Don't
 convert line break code.

* pgg-gpg.el (verify-region): Convert line break code to CRLF.
---
 mime-pgp.el |    4 ----
 pgg-gpg.el  |    4 +++-
 2 files changed, 3 insertions(+), 5 deletions(-)

diff --git a/mime-pgp.el b/mime-pgp.el
index 6d055d7..309c35a 100644
--- a/mime-pgp.el
+++ b/mime-pgp.el
@@ -150,10 +150,6 @@
     (unwind-protect
 	(with-temp-buffer
 	  (mime-insert-entity orig-entity)
-	  (goto-char (point-min))
-	  (while (progn (end-of-line) (not (eobp)))
-	    (insert "\r")
-	    (forward-line 1))
 	  (setq status (pgg-verify-region (point-min)(point-max) 
 					  sig-file 'fetch))
 	  (save-excursion 
diff --git a/pgg-gpg.el b/pgg-gpg.el
index 60493bd..8384eeb 100644
--- a/pgg-gpg.el
+++ b/pgg-gpg.el
@@ -216,7 +216,9 @@
   (let ((args '("--batch" "--verify")))
     (when (stringp signature)
       (setq args (append args (list signature))))
-    (pgg-gpg-process-region start end nil pgg-gpg-program args)
+    (pgg-as-lbt start end 'CRLF
+      (pgg-gpg-process-region start end nil pgg-gpg-program args)
+      )
     (save-excursion
       (set-buffer pgg-errors-buffer)
       (goto-char (point-min))
-- 
1.7.10.4