Fixed.
authorueno <ueno>
Tue, 18 Apr 2006 10:09:15 +0000 (10:09 +0000)
committerueno <ueno>
Tue, 18 Apr 2006 10:09:15 +0000 (10:09 +0000)
epa.el

diff --git a/epa.el b/epa.el
index dea687e..8db752b 100644 (file)
--- a/epa.el
+++ b/epa.el
@@ -505,7 +505,7 @@ If no one is selected, symmetric encryption will be performed.  "))))
        (error "No keys selected"))
      (setq default-name
           (expand-file-name
-           (concat (epg-sub-key-id (epg-key-sub-key-list (car keys)))
+           (concat (epg-sub-key-id (car (epg-key-sub-key-list (car keys))))
                    ".gpg")
            default-directory))
      (list keys