From: ShengHuo ZHU <zsh@cs.rochester.edu>
Date: Sun, 14 Jan 2001 04:44:54 +0000 (+0000)
Subject: 2001-01-13 23:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
X-Git-Url: http://cgit.sxemacs.org/?a=commitdiff_plain;ds=sidebyside;h=a257674247be9f2f2fccff3d6be974e208911fe6;p=gnus

2001-01-13 23:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>

	* gpg.el (gpg-build-arg-list): Use copy-sequence.
---

diff --git a/contrib/ChangeLog b/contrib/ChangeLog
index 647125a8f..ff2e151ae 100644
--- a/contrib/ChangeLog
+++ b/contrib/ChangeLog
@@ -1,3 +1,7 @@
+2001-01-13 23:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+	* gpg.el (gpg-build-arg-list): Use copy-sequence.
+
 2000-12-19 22:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
 	* gpg.el (defalias): Use eval-and-compile.
diff --git a/contrib/gpg.el b/contrib/gpg.el
index b6ce0dd7e..6c311597c 100644
--- a/contrib/gpg.el
+++ b/contrib/gpg.el
@@ -7,7 +7,7 @@
 ;; Keywords: crypto
 ;; Created: 2000-04-15
 
-;; $Id: gpg.el,v 1.8 2000/12/15 05:26:35 zsh Exp $
+;; $Id: gpg.el,v 1.9 2000/12/20 03:05:26 zsh Exp $
 
 ;; This file is NOT (yet?) part of GNU Emacs.
 
@@ -550,7 +550,7 @@ it are replaced by SUBSTITUTIONS.
 SUBSTITIONS is a list of (SYMBOL . SEXP) pairs, where SEXP is either a
 string (which is inserted literally), a list of strings (which are
 inserted as well), or nil, which means to insert nothing."
-  (let ((arglist (copy-list gpg-command-all-arglist)))
+  (let ((arglist (copy-sequence gpg-command-all-arglist)))
     (while template
       (let* ((templ (pop template))
 	     (repl (assoc templ substitutions))