From: vitaly <vitaly>
Date: Mon, 25 Jan 2010 10:04:47 +0000 (+0000)
Subject: Inhibit pgp autodecryption for draft preview
X-Git-Tag: elmo-imap4-compliance-root~9
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=02016bde606a1ee4c3c0253bca5525c22dc1315c;p=elisp%2Fwanderlust.git

Inhibit pgp autodecryption for draft preview
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 9f0b64a..2c4b90c 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2010-01-25  Vitaly Mayatskikh  <v.mayatskih@gmail.com>
+
+	* wl-draft.el (wl-draft-send-confirm-with-preview): Inhibit pgp
+	autodecryption for draft preview.
+
 2010-01-19  Vitaly Mayatskikh  <v.mayatskih@gmail.com>
 	* wl-summary.el (toplevel): New function
 	`wl-summary-toggle-mime-buttons' and keybinding to toggle
diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index c47f41c..afda8ff 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -1279,7 +1279,8 @@ This variable is valid when `wl-interactive-send' has non-nil value."
       (condition-case nil
 	  (progn
 	    (when wl-draft-send-confirm-with-preview
-	      (let (wl-draft-send-hook)
+	      (let (wl-draft-send-hook
+		    (pgg-decrypt-automatically nil))
 		(wl-draft-preview-message)))
 	    (save-excursion
 	      (goto-char (point-min)) ; to show recipients in header