From: ueno <ueno>
Date: Wed, 22 Nov 2006 23:52:49 +0000 (+0000)
Subject: Simplified.
X-Git-Tag: epg-0_0_8~10
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=5a694e5946280eab1f7cb7eefd10486a958050fe;p=elisp%2Fepg.git

Simplified.
---

diff --git a/epa.el b/epa.el
index 8036040..1ac41df 100644
--- a/epa.el
+++ b/epa.el
@@ -759,11 +759,9 @@ If no one is selected, default secret key is used.  "
 			  nil t)
 	 (catch 'done
 	   (while t
-	     (message "Signature type (N,c,d,?) ")
+	     (message "Signature type (n,c,d,?) ")
 	     (let ((c (read-char)))
-	       (cond ((or (eq c ?n) (eq c ?\n))
-		      (throw 'done nil))
-		     ((eq c ?c)
+	       (cond ((eq c ?c)
 		      (throw 'done 'clear))
 		     ((eq c ?d)
 		      (throw 'done 'detached))
@@ -776,7 +774,9 @@ n - Create a normal signature
 c - Create a cleartext signature
 d - Create a detached signature
 ? - Show this help
-"))))))))))
+"))))
+		     (t
+		      (throw 'done nil))))))))
   (save-excursion
     (let ((context (epg-make-context))
 	  signature)