Inhibit pgp autodecryption for draft preview

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 9f0b64a..2c4b90c 100644 (file)
--- 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 (file)
--- 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