summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix/scripts/package.scm8
1 files changed, 5 insertions, 3 deletions
diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm
index 0006cbd80f..11301ccff2 100644
--- a/guix/scripts/package.scm
+++ b/guix/scripts/package.scm
@@ -846,11 +846,13 @@ more information.~%"))
(current-error-port)
(%make-void-port "w"))))
(build-derivations (%store) (list prof-drv)))
- (begin
+ (let ((count (length packages)))
(switch-symlinks name prof)
(switch-symlinks profile name)
- (format #t (_ "~a packages in profile~%")
- (length packages))
+ (format #t (N_ "~a package in profile~%"
+ "~a packages in profile~%"
+ count)
+ count)
(display-search-paths packages
profile))))))))))