aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2013-01-13 23:47:37 +0100
committerLudovic Courtès <ludo@gnu.org>2013-01-13 23:47:37 +0100
commitae9e328800210bee6b5c04e5d80007d70bfadd75 (patch)
treecf645e6a9676081796594a08906ace26dc3920b7
parent1ca982808a3cc6b4f2e7136679a7e490609aade7 (diff)
downloadguix-ae9e328800210bee6b5c04e5d80007d70bfadd75.tar
guix-ae9e328800210bee6b5c04e5d80007d70bfadd75.tar.gz
guix-package: Fix check for ~/.guix-profile existence.
* guix-package.in (guix-package): When testing whether %USER-ENVIRONMENT-DIRECTORY exists, use `lstat' instead of `file-exists?'. Reported by Andreas Enge.
-rw-r--r--guix-package.in3
1 files changed, 2 insertions, 1 deletions
diff --git a/guix-package.in b/guix-package.in
index 450d09e081..3b8615cb72 100644
--- a/guix-package.in
+++ b/guix-package.in
@@ -462,7 +462,8 @@ Install, remove, or upgrade PACKAGES in a single transaction.\n"))
;; Create ~/.guix-profile if it doesn't exist yet.
(when (and %user-environment-directory
%current-profile
- (not (file-exists? %user-environment-directory)))
+ (not (false-if-exception
+ (lstat %user-environment-directory))))
(symlink %current-profile %user-environment-directory))
(with-error-handling