projects
/
elisp
/
semi.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(mime-display-text/richtext): Turn off adaptive-fill-mode while executing
[elisp/semi.git]
/
pgg-pgp.el
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
(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)))
"+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
(pgg-process-when-success
(goto-char (point-min))
(when (re-search-forward "^-+BEGIN PGP" nil t);XXX