diff options
| author | Justus Winter <[email protected]> | 2016-08-04 10:09:52 +0000 |
|---|---|---|
| committer | Justus Winter <[email protected]> | 2016-08-04 10:09:52 +0000 |
| commit | 3566544d04a4b81e5dd8a2883304673b2cc2f108 (patch) | |
| tree | 88c1623a937f88eb6741da7e0d446bb22ecec4f3 | |
| parent | po: Update Japanese translation. (diff) | |
| download | gnupg-3566544d04a4b81e5dd8a2883304673b2cc2f108.tar.gz gnupg-3566544d04a4b81e5dd8a2883304673b2cc2f108.zip | |
tests: Fix path to fake-pinentry.
* tests/openpgp/defs.scm: Correctly compute the path to fake-pinentry.
Signed-off-by: Justus Winter <[email protected]>
| -rw-r--r-- | tests/openpgp/defs.scm | 5 |
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**))) |