summaryrefslogtreecommitdiff
path: root/guix-package.in
diff options
context:
space:
mode:
Diffstat (limited to 'guix-package.in')
-rw-r--r--guix-package.in5
1 files changed, 2 insertions, 3 deletions
diff --git a/guix-package.in b/guix-package.in
index 58d6c49501..85ac358555 100644
--- a/guix-package.in
+++ b/guix-package.in
@@ -208,9 +208,8 @@ all of PACKAGES, a list of name/version/output/path tuples."
;; XXX: Get the previous generation number from the manifest?
(let* ((number (profile-number profile))
(previous-number (previous-profile-number profile number))
- (previous-profile (format #f "~a/~a-~a-link"
- (dirname profile) profile
- previous-number))
+ (previous-profile (format #f "~a-~a-link"
+ profile previous-number))
(manifest (string-append previous-profile "/manifest")))
(define (switch-link)