From: ueno <ueno>
Date: Tue, 9 Nov 1999 03:25:46 +0000 (+0000)
Subject: * pgg-pgp.el, pgg-pgp5.el
X-Git-Tag: emiko-1_13_7~29
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=87a62949376e3e45e4b07e9dd2d02c1220a69785;p=elisp%2Fsemi.git

* pgg-pgp.el, pgg-pgp5.el
(sign-region): Don't convert line break	code.
---

diff --git a/pgg-pgp.el b/pgg-pgp.el
index 1a5e7b8..70b4db4 100644
--- a/pgg-pgp.el
+++ b/pgg-pgp.el
@@ -182,15 +182,10 @@
 	 (args 
 	  (list (if clearsign "-fast" "-fbast")
 		"+verbose=1" "+language=us" "+batchmode"
-		"-u" pgg-pgp-user-id))
-	 (inhibit-read-only t)
-	 buffer-read-only)
-    (pgg-as-lbt start end 'CRLF
-      (pgg-pgp-process-region start end passphrase 
-			      pgg-pgp-program args)
-      )
+		"-u" pgg-pgp-user-id)))
+    (pgg-pgp-process-region start end passphrase 
+			    pgg-pgp-program args)
     (pgg-process-when-success
-      (pgg-convert-lbt-region (point-min)(point-max) 'LF)
       (goto-char (point-min))
       (when (re-search-forward "^-+BEGIN PGP" nil t);XXX
 	(let ((packet 
diff --git a/pgg-pgp5.el b/pgg-pgp5.el
index 3252be2..494b678 100644
--- a/pgg-pgp5.el
+++ b/pgg-pgp5.el
@@ -196,12 +196,9 @@
 	  (list (if clearsign "-fat" "-fbat")
 		"+verbose=1" "+language=us" "+batchmode=1"
 		"-u" pgg-pgp5-user-id)))
-    (pgg-as-lbt start end 'CRLF
-      (pgg-pgp5-process-region start end passphrase 
-			       pgg-pgp5-pgps-program args)
-      )
+    (pgg-pgp5-process-region start end passphrase 
+			     pgg-pgp5-pgps-program args)
     (pgg-process-when-success
-      (pgg-convert-lbt-region (point-min)(point-max) 'LF)
       (when (re-search-forward "^-+BEGIN PGP SIGNATURE" nil t);XXX
 	(let ((packet 
 	       (cdr (assq 2 (pgg-parse-armor-region