diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2012-12-13 22:53:05 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2012-12-13 22:57:36 +0100 |
| commit | a020d2a996b1d420088f2a6e92f173b950434eba (patch) | |
| tree | d4a452dc9968c4f45847aa873fddce0f40f84b37 | |
| parent | d7e2841b9d757fa365bb4c6d101092ccd93de84c (diff) | |
| download | guix-a020d2a996b1d420088f2a6e92f173b950434eba.tar.gz | |
guix-package: Use directory names from (guix config).
* guix-package.in (%profile-directory): Use %STATE-DIRECTORY instead of a hard-coded directory.
| -rw-r--r-- | guix-package.in | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix-package.in b/guix-package.in index ff7f38383e..dbd2ee24c7 100644 --- a/guix-package.in +++ b/guix-package.in @@ -35,6 +35,7 @@ exec ${GUILE-@GUILE@} -L "@guilemoduledir@" -l "$0" \ #:use-module (guix derivations) #:use-module (guix packages) #:use-module (guix utils) + #:use-module (guix config) #:use-module (ice-9 ftw) #:use-module (ice-9 format) #:use-module (ice-9 match) @@ -61,8 +62,7 @@ exec ${GUILE-@GUILE@} -L "@guilemoduledir@" -l "$0" \ (cut string-append <> "/.guix-profile"))) (define %profile-directory - (string-append "/nix/var/nix/profiles/" - "guix/" + (string-append %state-directory "/profiles/" (or (and=> (getenv "USER") (cut string-append "per-user/" <>)) "default"))) |