diff --git a/gnu/packages/backup.scm b/gnu/packages/backup.scm
index 43818584b5..2c132c1ef7 100644
--- a/gnu/packages/backup.scm
+++ b/gnu/packages/backup.scm
@@ -1360,7 +1360,7 @@ borgmatic is powered by borg.")
                  (string-append "which('" #$(this-package-input "borg")
                                 "/bin/borg')")))))
           ;; XXX The test suite tries to write to $HOME.
-          (add-before 'check 'set-HOME
+          (add-before 'sanity-check 'set-HOME
             (lambda _
               (setenv "HOME" "/tmp")))
           ;; Otherwise, the user interface's icons will be missing.