aboutsummaryrefslogtreecommitdiffstats
path: root/tests/openpgp/setup.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/openpgp/setup.scm')
-rwxr-xr-xtests/openpgp/setup.scm7
1 files changed, 4 insertions, 3 deletions
diff --git a/tests/openpgp/setup.scm b/tests/openpgp/setup.scm
index 00eed53fc..22c89a389 100755
--- a/tests/openpgp/setup.scm
+++ b/tests/openpgp/setup.scm
@@ -19,8 +19,9 @@
(load (in-srcdir "tests" "openpgp" "defs.scm"))
-(unless (member "--create-tarball" *args*)
- (fail "Usage: setup.scm --create-tarball <file>"))
+(define cache (flag "--create-tarball" *args*))
+(unless (and cache (= 1 (length cache)))
+ (fail "Usage: setup.scm --create-tarball <file> [--use-keyring]"))
(when (> (*verbose*) 0)
(define (pad symbol length)
@@ -45,4 +46,4 @@
(start-agent)
(create-legacy-gpghome)
(stop-agent)
-(call-check `(,(tool 'gpgtar) --create --output ,(cadr *args*) "."))
+(call-check `(,(tool 'gpgtar) --create --output ,(car cache) "."))