diff --git a/guix/profiles.scm b/guix/profiles.scm
index 9b5c5f515c2f2cc7bd30a54d50972cd69a8cc8ed..1ff6c97f9fa1ade62d34022beb9b9261dbeb5a16 100644
--- a/guix/profiles.scm
+++ b/guix/profiles.scm
@@ -1,5 +1,5 @@
 ;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2013 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2013, 2014 Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright © 2013 Nikita Karetnikov <nikita@karetnikov.org>
 ;;;
 ;;; This file is part of GNU Guix.
@@ -238,8 +238,6 @@ (define builder
 
        (let ((output (assoc-ref %outputs "out"))
              (inputs (map cdr %build-inputs)))
-         (format #t "building profile '~a' with ~a packages...~%"
-                 output (length inputs))
          (union-build output inputs
                       #:log-port (%make-void-port "w"))
          (call-with-output-file (string-append output "/manifest")