projects
/
elisp
/
semi.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Inversed condition was accidently used in last patch.
[elisp/semi.git]
/
pgg-pgp.el
diff --git
a/pgg-pgp.el
b/pgg-pgp.el
index
a99bdbd
..
c64713e
100644
(file)
--- a/
pgg-pgp.el
+++ b/
pgg-pgp.el
@@
-20,8
+20,8
@@
;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING. If not, write to the
;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING. If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
;;; Code:
;;; Code:
@@
-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