diff options
author | Ludovic Courtès <ludo@gnu.org> | 2012-12-05 22:41:58 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2012-12-05 22:42:11 +0100 |
commit | b980f0f9fd6f926f2a1130f77bd3cdb70e741429 (patch) | |
tree | 5d640c98f4126530c84cc2f7b61fee878c547d95 /tests/utils.scm | |
parent | f5c82e15e0e76b855bc4cc88ffb79331b7083f39 (diff) | |
download | patches-b980f0f9fd6f926f2a1130f77bd3cdb70e741429.tar patches-b980f0f9fd6f926f2a1130f77bd3cdb70e741429.tar.gz |
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.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/tests/utils.scm b/tests/utils.scm index 0a6e8a0833..ba04e281eb 100644 --- a/tests/utils.scm +++ b/tests/utils.scm @@ -18,7 +18,7 @@ (define-module (test-utils) #:use-module (guix utils) - #:use-module ((guix store) #:select (store-path-package-name)) + #:use-module ((guix store) #:select (%store-prefix store-path-package-name)) #:use-module (srfi srfi-1) #:use-module (srfi srfi-11) #:use-module (srfi srfi-64) @@ -127,7 +127,8 @@ (test-equal "store-path-package-name" "bash-4.2-p24" (store-path-package-name - "/nix/store/qvs2rj2ia5vci3wsdb7qvydrmacig4pg-bash-4.2-p24")) + (string-append (%store-prefix) + "/qvs2rj2ia5vci3wsdb7qvydrmacig4pg-bash-4.2-p24"))) (test-end) |