summaryrefslogtreecommitdiff
path: root/tests/utils.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2012-12-05 22:41:58 +0100
committerLudovic Courtès <ludo@gnu.org>2012-12-05 22:42:11 +0100
commitb980f0f9fd6f926f2a1130f77bd3cdb70e741429 (patch)
tree5d640c98f4126530c84cc2f7b61fee878c547d95 /tests/utils.scm
parentf5c82e15e0e76b855bc4cc88ffb79331b7083f39 (diff)
tests: Remove hard-coded /nix/store.
* tests/utils.scm ("store-path-package-name"): Use (%store-prefix) instead of a hard-coded "/nix/store".
Diffstat (limited to 'tests/utils.scm')
-rw-r--r--tests/utils.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/tests/utils.scm b/tests/utils.scm
index 0a6e8a08332..ba04e281eb1 100644
--- a/tests/utils.scm
+++ b/tests/utils.scm
@@ -18,7 +18,7 @@
18 18
19(define-module (test-utils) 19(define-module (test-utils)
20 #:use-module (guix utils) 20 #:use-module (guix utils)
21 #:use-module ((guix store) #:select (store-path-package-name)) 21 #:use-module ((guix store) #:select (%store-prefix store-path-package-name))
22 #:use-module (srfi srfi-1) 22 #:use-module (srfi srfi-1)
23 #:use-module (srfi srfi-11) 23 #:use-module (srfi srfi-11)
24 #:use-module (srfi srfi-64) 24 #:use-module (srfi srfi-64)
@@ -127,7 +127,8 @@
127(test-equal "store-path-package-name" 127(test-equal "store-path-package-name"
128 "bash-4.2-p24" 128 "bash-4.2-p24"
129 (store-path-package-name 129 (store-path-package-name
130 "/nix/store/qvs2rj2ia5vci3wsdb7qvydrmacig4pg-bash-4.2-p24")) 130 (string-append (%store-prefix)
131 "/qvs2rj2ia5vci3wsdb7qvydrmacig4pg-bash-4.2-p24")))
131 132
132(test-end) 133(test-end)
133 134