aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2013-06-20 21:24:14 +0200
committerLudovic Courtès <ludo@gnu.org>2013-06-20 23:41:31 +0200
commitfe1818e26a7ff7e2792cfb5c20a92b443bc6a3a0 (patch)
tree62db6436112f011e2deb83433ff280462aac017e
parenta85060efec5766280d19219112db6f7fdd2fb32a (diff)
downloadpatches-fe1818e26a7ff7e2792cfb5c20a92b443bc6a3a0.tar
patches-fe1818e26a7ff7e2792cfb5c20a92b443bc6a3a0.tar.gz
package: Fix i18n of the number of packages message.
* guix/scripts/package.scm (guix-package)[process-actions]: Use `N_' for i18n of the number of packages message.
-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))))))))))