aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--tests/openpgp/defs.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/tests/openpgp/defs.scm b/tests/openpgp/defs.scm
index 9408cd5f4..2cbad46c5 100644
--- a/tests/openpgp/defs.scm
+++ b/tests/openpgp/defs.scm
@@ -60,7 +60,8 @@
"agent/gpg-preset-passphrase")
(mktdata "MKTDATA" "tools/mk-tdata")
(gpgtar "GPGTAR" "tools/gpgtar")
- (gpg-zip "GPGZIP" "tools/gpg-zip")))
+ (gpg-zip "GPGZIP" "tools/gpg-zip")
+ (pinentry "PINENTRY" "tests/openpgp/fake-pinentry")))
(define (tool which)
(let ((t (assoc which tools))
@@ -77,7 +78,7 @@
(define GPG `(,(tool 'gpg) --no-permission-warning
,@(if have-opt-always-trust '(--always-trust) '())))
-(define PINENTRY (string-append (getcwd) "/" (qualify "fake-pinentry")))
+(define PINENTRY (tool 'pinentry))
(define (tr:gpg input args)
(tr:spawn input `(,@GPG --output **out** ,@args **in**)))