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

Fixed.
---

diff --git a/epa.el b/epa.el
index dea687e..8db752b 100644
--- 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