changeset 75985:49a4f4e58561

(pgg-gpg-process-region): Make USE-AGENT nil if PASSPHRASE is given.
author Richard M. Stallman <rms@gnu.org>
date Sat, 17 Feb 2007 20:38:20 +0000
parents 89707a1526bd
children 6fcd34fb603e
files lisp/pgg-gpg.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/pgg-gpg.el	Sat Feb 17 17:39:33 2007 +0000
+++ b/lisp/pgg-gpg.el	Sat Feb 17 20:38:20 2007 +0000
@@ -61,7 +61,7 @@
   "GnuPG ID of your default identity.")
 
 (defun pgg-gpg-process-region (start end passphrase program args)
-  (let* ((use-agent (pgg-gpg-use-agent-p)) 
+  (let* ((use-agent (and (null passphrase) (pgg-gpg-use-agent-p)))
 	 (output-file-name (pgg-make-temp-file "pgg-output"))
 	 (args
 	  `("--status-fd" "2"