security-and-privacy/gnupg
security-and-privacy/gnupg
1
0
Fork 0
mirror of git://git.gnupg.org/gnupg.git synced 2024-06-03 22:48:03 +02:00
Code Activity

gpgscm: Make logging less verbose and more useful.

Browse Source 
* tests/gpgscm/tests.scm (call-with-io): When being verbose, include
the pid in the output, and avoid duplicating the command arguments.

Signed-off-by: Justus Winter <justus@g10code.com>
This commit is contained in:
Justus Winter 2017-04-20 11:49:17 +02:00
parent a71f4142e1
commit 679920781a
No known key found for this signature in database
GPG Key ID: DD1A52F9DA8C9020
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
tests/gpgscm/tests.scm
View File

@ -104,10 +104,11 @@
(es-fclose (:stdout h)) (es-fclose (:stdout h))
(es-fclose (:stderr h)) (es-fclose (:stderr h))
(if (> (*verbose*) 2) (if (> (*verbose*) 2)
(begin (info "Child" (:pid h) "returned:"
(echo (stringify what) "returned:" result) `((command ,(stringify what))
(echo (stringify what) "wrote to stdout:" out) (status ,result)
(echo (stringify what) "wrote to stderr:" err))) (stdout ,out)
(stderr ,err))))
(list result out err)))) (list result out err))))
;; Accessor function for the results of 'call-with-io'. ':stdout' and ;; Accessor function for the results of 'call-with-io'. ':stdout' and