diff options
Diffstat (limited to 'tests/gpgscm/tests.scm')
| -rw-r--r-- | tests/gpgscm/tests.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/gpgscm/tests.scm b/tests/gpgscm/tests.scm index d89a96f88..72afa9913 100644 --- a/tests/gpgscm/tests.scm +++ b/tests/gpgscm/tests.scm @@ -38,6 +38,10 @@ (apply echo msg) (flush-stdio)) +(define (log . msg) + (if (> (*verbose*) 0) + (apply info msg))) + (define (error . msg) (apply info msg) (exit 1)) |