tests: Fix distcheck.
authorJustus Winter <justus@g10code.com>
Wed, 10 Aug 2016 15:57:32 +0000 (17:57 +0200)
committerJustus Winter <justus@g10code.com>
Wed, 10 Aug 2016 15:57:32 +0000 (17:57 +0200)
* tests/openpgp/issue2417.scm: Copy configuration.

Signed-off-by: Justus Winter <justus@g10code.com>
tests/openpgp/issue2417.scm

index 32840f2..9079323 100755 (executable)
@@ -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")