From: ueno <ueno>
Date: Fri, 5 Nov 1999 07:31:35 +0000 (+0000)
Subject: (lookup-key-string): Undo last change.
X-Git-Tag: emiko-1_13_7~61
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=d20c4baf66a63237223e2ef6b3357a18d1aac7a3;p=elisp%2Fsemi.git

(lookup-key-string): Undo last change.
---

diff --git a/pgg-gpg.el b/pgg-gpg.el
index a522967..37b259f 100644
--- a/pgg-gpg.el
+++ b/pgg-gpg.el
@@ -129,10 +129,8 @@
   (let ((args (list "--with-colons" "--no-greeting" "--batch" 
 		    (if type "--list-secret-keys" "--list-keys")
 		    string)))
-    (with-current-buffer (get-buffer-create pgg-output-buffer)
-      (buffer-disable-undo)
-      (erase-buffer)
-      (apply #'call-process pgg-gpg-program nil t args)
+    (pgg-gpg-process-region (point)(point) nil pgg-gpg-program args)
+    (with-current-buffer pgg-output-buffer
       (goto-char (point-min))
       (when (re-search-forward "^\\(sec\\|pub\\):"  nil t)
 	(substring