* 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 (file)
--- 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 (file)
--- 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