From: ueno <ueno>
Date: Tue, 2 May 2000 02:42:24 +0000 (+0000)
Subject: * pgg-gpg.el (pgg-scheme-encrypt-region): Don't quote recipient;
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=9ac5911c56cc6b862709e52da90461b084bc6f6c;p=elisp%2Fsemi.git

* pgg-gpg.el (pgg-scheme-encrypt-region): Don't quote recipient;
concatenate all arguments destructively.
---

diff --git a/ChangeLog b/ChangeLog
index 426d773..99e5948 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2000-05-02   Daiki Ueno  <ueno@unixuser.org>
+
+	* pgg-gpg.el (pgg-scheme-encrypt-region): Don't quote recipient;
+	concatenate all arguments destructively.
+
 2000-04-13   Daiki Ueno  <ueno@unixuser.org>
 
 	* pgg-gpg.el: Fix author's mailing address.
diff --git a/pgg-gpg.el b/pgg-gpg.el
index 154263c..3cf8b0c 100644
--- a/pgg-gpg.el
+++ b/pgg-gpg.el
@@ -138,10 +138,9 @@
 	 (args
 	  `("--batch" "--armor" "--always-trust" "--encrypt"
 	    ,@(if recipients
-		  (apply #'append
+		  (apply #'nconc
 			 (mapcar (lambda (rcpt)
-				   (list "--remote-user"
-					 (concat "\"" rcpt "\"")))
+				   (list "--remote-user" rcpt))
 				 (append recipients
 					 (if pgg-encrypt-for-me
 					     (list pgg-gpg-user-id)))))))))