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:
98fff07
)
Silence write-region.
author
ueno
<ueno>
Fri, 21 Apr 2006 06:54:46 +0000
(06:54 +0000)
committer
ueno
<ueno>
Fri, 21 Apr 2006 06:54:46 +0000
(06:54 +0000)
epg.el
patch
|
blob
|
history
diff --git
a/epg.el
b/epg.el
index
5245a57
..
843e463
100644
(file)
--- a/
epg.el
+++ b/
epg.el
@@
-993,7
+993,7
@@
If PLAIN is nil, it returns the result as a string."
(coding-system-for-write 'binary))
(unwind-protect
(progn
(coding-system-for-write 'binary))
(unwind-protect
(progn
- (write-region cipher nil input-file)
+ (write-region cipher nil input-file nil 'quiet)
(epg-context-set-output-file context
(epg-make-temp-file "epg-output"))
(epg-start-decrypt context (epg-make-data-from-file input-file))
(epg-context-set-output-file context
(epg-make-temp-file "epg-output"))
(epg-start-decrypt context (epg-make-data-from-file input-file))
@@
-1081,7
+1081,7
@@
For a normal or a clear text signature, SIGNED-TEXT should be nil."
(if signed-text
(progn
(setq input-file (epg-make-temp-file "epg-signature"))
(if signed-text
(progn
(setq input-file (epg-make-temp-file "epg-signature"))
- (write-region signature nil input-file)
+ (write-region signature nil input-file nil 'quiet)
(epg-start-verify context
(epg-make-data-from-file input-file)
(epg-make-data-from-string signed-text)))
(epg-start-verify context
(epg-make-data-from-file input-file)
(epg-make-data-from-string signed-text)))