[Pkg-gnupg-commit] [gnupg2] 42/112: tests: Fix path to fake-pinentry.

[Daniel Kahn Gillmor]

This is an automated email from the git hooks/post-receive script.

dkg pushed a commit to branch master
in repository gnupg2.

commit 3566544d04a4b81e5dd8a2883304673b2cc2f108
Author: Justus Winter <justus at g10code.com>
Date:   Thu Aug 4 12:09:52 2016 +0200

    tests: Fix path to fake-pinentry.
    
    * tests/openpgp/defs.scm: Correctly compute the path to fake-pinentry.
    
    Signed-off-by: Justus Winter <justus at g10code.com>
---
 tests/openpgp/defs.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/tests/openpgp/defs.scm b/tests/openpgp/defs.scm
index 9408cd5..2cbad46 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 `(, at GPG --output **out** , at args **in**)))

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-gnupg/gnupg2.git