* pgg-gpg.el (pgg-gpg-process-region): Abolish redundant nconc.
[elisp/semi.git] / pgg-gpg.el
index 3cf8b0c..b475016 100644 (file)
   (let* ((output-file-name
          (concat temporary-file-directory (make-temp-name "pgg-output")))
         (args
-         (nconc
-          `("--status-fd" "2"
-            ,@(if passphrase '("--passphrase-fd" "0"))
-            "--output" ,output-file-name ,@pgg-gpg-extra-args)
-          args))
+         `("--status-fd" "2"
+           ,@(if passphrase '("--passphrase-fd" "0"))
+           "--output" ,output-file-name
+           ,@pgg-gpg-extra-args ,@args))
         (output-buffer pgg-output-buffer)
         (errors-buffer pgg-errors-buffer)
         (orig-mode (default-file-modes))