Create pgg-output-buffer everytime cryptographic operations are called.
authorueno <ueno>
Tue, 25 Apr 2006 06:35:34 +0000 (06:35 +0000)
committerueno <ueno>
Tue, 25 Apr 2006 06:35:34 +0000 (06:35 +0000)
pgg-epg.el

index 345cc7c..e21faa2 100644 (file)
@@ -63,6 +63,8 @@ passphrase cache or user."
     (epg-context-set-armor context t)
     (epg-context-set-textmode context pgg-text-mode)
     (epg-context-set-passphrase-callback context #'pgg-epg-passphrase-callback)
+    (get-buffer-create pgg-output-buffer)
+    (get-buffer-create pgg-errors-buffer)
     (condition-case error
        (setq cipher
              (epg-encrypt-string context
@@ -107,6 +109,8 @@ passphrase cache or user."
     (epg-context-set-armor context t)
     (epg-context-set-textmode context pgg-text-mode)
     (epg-context-set-passphrase-callback context #'pgg-epg-passphrase-callback)
+    (get-buffer-create pgg-output-buffer)
+    (get-buffer-create pgg-errors-buffer)
     (condition-case error
        (setq plain (epg-decrypt-string context (buffer-substring start end))
              pgg-epg-secret-key-id-list nil)
@@ -133,6 +137,8 @@ passphrase cache or user."
     (epg-context-set-armor context t)
     (epg-context-set-textmode context pgg-text-mode)
     (epg-context-set-passphrase-callback context #'pgg-epg-passphrase-callback)
+    (get-buffer-create pgg-output-buffer)
+    (get-buffer-create pgg-errors-buffer)
     (condition-case error
        (setq signature
              (epg-sign-string context
@@ -161,6 +167,8 @@ Verify region between START and END as the detached signature SIGNATURE."
   (let ((context (epg-make-context)))
     (epg-context-set-armor context t)
     (epg-context-set-textmode context pgg-text-mode)
+    (get-buffer-create pgg-output-buffer)
+    (get-buffer-create pgg-errors-buffer)
     (if signature
        (epg-verify-string context
                           (with-temp-buffer