From: teranisi <teranisi>
Date: Mon, 9 Jun 2003 14:26:57 +0000 (+0000)
Subject: * pgg-gpg.el (pgg-gpg-process-region): Undo the last change;
X-Git-Tag: semi-1_14_6~19
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=2b3657424edb4ce61cc0e764f83c04f6b4a4a1ea;p=elisp%2Fsemi.git

* pgg-gpg.el (pgg-gpg-process-region): Undo the last change;
Add --yes option to overwrite existing output file.
---

diff --git a/ChangeLog b/ChangeLog
index dd93a3c..971b240 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2003-06-09  Yuuichi Teranishi  <teranisi@gohome.org>
+
+	* pgg-gpg.el (pgg-gpg-process-region): Undo the last change;
+	Add --yes option to overwrite existing output file.
+
 2003-05-29  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* pgg-gpg.el (pgg-gpg-process-region): Undo the last change.
diff --git a/pgg-gpg.el b/pgg-gpg.el
index 191c90b..89498c8 100644
--- a/pgg-gpg.el
+++ b/pgg-gpg.el
@@ -60,12 +60,13 @@
 	    (luna-make-entity 'pgg-scheme-gpg))))
 
 (defun pgg-gpg-process-region (start end passphrase program args)
-  (let* ((output-file-name (make-temp-name
+  (let* ((output-file-name (make-temp-file
 			    (expand-file-name "pgg-output"
 					      temporary-file-directory)))
 	 (args
 	  `("--status-fd" "2"
 	    ,@(if passphrase '("--passphrase-fd" "0"))
+	    "--yes" ; overwrite
 	    "--output" ,output-file-name
 	    ,@pgg-gpg-extra-args ,@args))
 	 (output-buffer pgg-output-buffer)