From: ueno <ueno>
Date: Tue, 18 Apr 2006 10:01:18 +0000 (+0000)
Subject: Fixed.
X-Git-Tag: epgsm-branchpoint~32
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7d2bed437b2ebba7bb39acae95d0d740ca2455b3;p=elisp%2Fepg.git

Fixed.
---

diff --git a/epa.el b/epa.el
index 61b26fa..089aee0 100644
--- a/epa.el
+++ b/epa.el
@@ -493,7 +493,7 @@ If no one is selected, symmetric encryption will be performed.  "))))
   (interactive "fFile: ")
   (let ((context (epg-make-context)))
     (message "Importing %s..." (file-name-nondirectory file))
-    (epg-import-keys context file)
+    (epg-import-keys-from-file context file)
     (apply #'epa-list-keys epa-list-keys-arguments)
     (message "Importing %s...done" (file-name-nondirectory file))))
 
@@ -518,7 +518,7 @@ If no one is selected, symmetric encryption will be performed.  "))))
 	     default-name)))))
   (let ((context (epg-make-context)))
     (message "Exporting to %s..." (file-name-nondirectory file))
-    (epg-export-keys context keys file)
+    (epg-export-keys-to-file context keys file)
     (message "Exporting to %s...done" (file-name-nondirectory file))))
 
 (provide 'epa)