From e1a4770fb07cfcea7c0c03d880ac253167a24d6d Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Sun, 20 Feb 2022 01:00:00 +0100
Subject: gnu: pspp: Fix failing test suite.

* gnu/packages/statistics.scm (pspp)[arguments]: Add a new 'prepare-tests phase.
---
 gnu/packages/statistics.scm | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/gnu/packages/statistics.scm b/gnu/packages/statistics.scm
index bf384726de..f32183bf89 100644
--- a/gnu/packages/statistics.scm
+++ b/gnu/packages/statistics.scm
@@ -34,6 +34,7 @@
 ;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
 
 (define-module (gnu packages statistics)
+  #:use-module (guix gexp)
   #:use-module ((guix licenses) #:prefix license:)
   #:use-module (guix packages)
   #:use-module (guix download)
@@ -109,6 +110,14 @@
        (base32
         "0lqrash677b09zxdlxp89z6k02y4i23mbqg83956dwl69wc53dan"))))
     (build-system gnu-build-system)
+    (arguments
+     (list #:phases
+           #~(modify-phases %standard-phases
+               (add-before 'check 'prepare-tests
+                 ;; Prevent irrelevant errors that cause test output mismatches:
+                 ;; ‘Fontconfig error: No writable cache directories’
+                 (lambda _
+                   (setenv "XDG_CACHE_HOME" (getcwd)))))))
     (inputs
      (list cairo
            gettext-minimal
-- 
cgit 1.4.1