From 87a62949376e3e45e4b07e9dd2d02c1220a69785 Mon Sep 17 00:00:00 2001 From: ueno Date: Tue, 9 Nov 1999 03:25:46 +0000 Subject: [PATCH] * pgg-pgp.el, pgg-pgp5.el (sign-region): Don't convert line break code. --- pgg-pgp.el | 11 +++-------- pgg-pgp5.el | 7 ++----- 2 files changed, 5 insertions(+), 13 deletions(-) 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 -- 1.7.10.4