From 9af05aa29d740f753484a1c37a562f4da2c789c3 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Wed, 19 Jun 2013 22:42:03 +0200
Subject: [PATCH] package: Display the number of installed packages upon
 completion.

* guix/scripts/package.scm (guix-package)[process-actions]: Display the
  number of packages in the profile upon completion.
---
 guix/scripts/package.scm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm
index 69b7efd154..0006cbd80f 100644
--- a/guix/scripts/package.scm
+++ b/guix/scripts/package.scm
@@ -849,6 +849,8 @@ (define (show-what-to-remove/install remove install dry-run?)
                               (begin
                                 (switch-symlinks name prof)
                                 (switch-symlinks profile name)
+                                (format #t (_ "~a packages in profile~%")
+                                        (length packages))
                                 (display-search-paths packages
                                                       profile))))))))))