From 5a694e5946280eab1f7cb7eefd10486a958050fe Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Wed, 22 Nov 2006 23:52:49 +0000
Subject: [PATCH] Simplified.

---
 epa.el |   10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

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)
-- 
1.7.10.4