projects
/
elisp
/
epg.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
7cff708
)
Simplified.
author
ueno
<ueno>
Wed, 22 Nov 2006 23:52:49 +0000
(23:52 +0000)
committer
ueno
<ueno>
Wed, 22 Nov 2006 23:52:49 +0000
(23:52 +0000)
epa.el
patch
|
blob
|
history
diff --git
a/epa.el
b/epa.el
index
8036040
..
1ac41df
100644
(file)
--- 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
nil t)
(catch 'done
(while t
- (message "Signature type (N,c,d,?) ")
+ (message "Signature type (n,c,d,?) ")
(let ((c (read-char)))
(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))
(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
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)
(save-excursion
(let ((context (epg-make-context))
signature)