[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: gnu: gnupg: Fix test failures.
From: |
Leo Famulari |
Subject: |
01/01: gnu: gnupg: Fix test failures. |
Date: |
Sun, 21 Aug 2016 22:08:17 +0000 (UTC) |
lfam pushed a commit to branch core-updates
in repository guix.
commit dd582f4ae55ee341d9a11c34f5e20e4b287ffe2b
Author: ng0 <address@hidden>
Date: Sat Aug 20 08:37:22 2016 +0000
gnu: gnupg: Fix test failures.
* gnu/packages/gnupg.scm (gnupg)[arguments]: Set $HOME before 'check' phase.
Signed-off-by: Leo Famulari <address@hidden>
---
gnu/packages/gnupg.scm | 8 +++++++-
1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/gnupg.scm b/gnu/packages/gnupg.scm
index 27db5c3..52a9fc5 100644
--- a/gnu/packages/gnupg.scm
+++ b/gnu/packages/gnupg.scm
@@ -247,7 +247,13 @@ compatible to GNU Pth.")
(lambda _
(substitute* (find-files "tests" ".\\.scm$")
(("/usr/bin/env gpgscm")
- (string-append (getcwd) "/tests/gpgscm/gpgscm"))))))))
+ (string-append (getcwd) "/tests/gpgscm/gpgscm")))))
+ (add-before 'check 'set-home
+ ;; Some tests require write access to $HOME, otherwise leading to
+ ;; 'failed to create directory /homeless-shelter/.asy' error.
+ (lambda _
+ (setenv "HOME" "/tmp")
+ #t)))))
(home-page "https://gnupg.org/")
(synopsis "GNU Privacy Guard")
(description