nconc -> append

[elisp/epg.git] / epg.el

diff --git a/epg.el b/epg.el
index 9e2a209..356ad57 100644 (file)
--- a/epg.el
+++ b/epg.el
@@ -1677,7 +1677,7 @@ This function is for internal use only."
     (unless (listp name)
       (setq name (list name)))
     (while name
-      (setq args (nconc args (list list-keys-option (car name)))
+      (setq args (append args (list list-keys-option (car name)))
            name (cdr name)))
     (with-temp-buffer
       (apply #'call-process