mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-05-04 00:05:56 +02:00
config: '%store-directory' always honors $NIX_STORE_DIR.
* guix/config.scm.in (%store-directory): Honor $NIX_STORE_DIR. * guix/store.scm (%store-prefix): Use %store-directory directly.
This commit is contained in:
+2
-1
@@ -51,7 +51,8 @@
|
||||
"@PACKAGE_URL@")
|
||||
|
||||
(define %store-directory
|
||||
"@storedir@")
|
||||
(or (and=> (getenv "NIX_STORE_DIR") canonicalize-path)
|
||||
"@storedir@"))
|
||||
|
||||
(define %state-directory
|
||||
;; This must match `NIX_STATE_DIR' as defined in `daemon.am'.
|
||||
|
||||
+1
-2
@@ -701,8 +701,7 @@ is true."
|
||||
|
||||
(define %store-prefix
|
||||
;; Absolute path to the Nix store.
|
||||
(make-parameter (or (and=> (getenv "NIX_STORE_DIR") canonicalize-path)
|
||||
%store-directory)))
|
||||
(make-parameter %store-directory))
|
||||
|
||||
(define (store-path? path)
|
||||
"Return #t if PATH is a store path."
|
||||
|
||||
Reference in New Issue
Block a user