From a6acf1f6b39c5a607f61f643a5d21309ba58685d Mon Sep 17 00:00:00 2001 From: Justus Winter Date: Wed, 10 Aug 2016 17:57:32 +0200 Subject: [PATCH] tests: Fix distcheck. * tests/openpgp/issue2417.scm: Copy configuration. Signed-off-by: Justus Winter --- tests/openpgp/issue2417.scm | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/tests/openpgp/issue2417.scm b/tests/openpgp/issue2417.scm index 32840f25e..9079323fe 100755 --- a/tests/openpgp/issue2417.scm +++ b/tests/openpgp/issue2417.scm @@ -19,6 +19,8 @@ (load (with-path "defs.scm")) +(define old-home (getenv "GNUPGHOME")) + (define (touch file-name) (close (open file-name (logior O_WRONLY O_BINARY O_CREAT) #o600))) @@ -32,6 +34,8 @@ (pipe:write-to keyfile (logior O_WRONLY O_BINARY O_CREAT) #o600)) (with-temporary-working-directory + (file-copy (path-join old-home "gpg.conf") "gpg.conf") + (file-copy (path-join old-home "gpg-agent.conf") "gpg-agent.conf") (setenv "GNUPGHOME" "." #t) (touch "trustdb.gpg") (touch "pubring.gpg")