01/09: tests: Use non-deprecated (guix store) API.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit ba926e35341c355fbfaf51d074269982a1e1ad8d
Author: Ludovic Courtès <address@hidden>
Date:   Mon Mar 4 12:22:54 2019 +0100

    tests: Use non-deprecated (guix store) API.
    
    This is a followup to f9e8a12379c6fefc9e5c3c7fc3926599bbefc013.
    
    * gnu/tests/base.scm (run-basic-test)["/run/current-system is a GC
    root"]: Use 'store-protocol-error?' instead of 'nix-protocol-error?'.
---
 gnu/tests/base.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gnu/tests/base.scm b/gnu/tests/base.scm
index 0f8fb7f..cc8b273 100644
--- a/gnu/tests/base.scm
+++ b/gnu/tests/base.scm
@@ -397,7 +397,7 @@ info --version")
                                 (use-modules (srfi srfi-34) (guix store))
 
                                 (let ((system (readlink 
"/run/current-system")))
-                                  (guard (c ((nix-protocol-error? c)
+                                  (guard (c ((store-protocol-error? c)
                                              (and (file-exists? system)
                                                   'success!)))
                                     (with-store store