package: Display the output of packages to be installed/removed.

* guix/scripts/package.scm (guix-package)[show-what-to-remove/install]:
  Display the output name.

1 files changed, 3 insertions, 3 deletions

diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm
index 1d17911dc1..c691315253 100644
--- a/guix/scripts/package.scm
+++ b/guix/scripts/package.scm
@@ -652,10 +652,10 @@ Install, remove, or upgrade PACKAGES in a single transaction.\n"))
                        remove))))
         (_ #f))
       (match install
-        (((name version _ path _) ..1)
+        (((name version output path _) ..1)
          (let ((len     (length name))
-               (install (map (cut format #f "   ~a-~a\t~a" <> <> <>)
-                             name version path)))
+               (install (map (cut format #f "   ~a-~a\t~a\t~a" <> <> <> <>)
+                             name version output path)))
            (if dry-run?
                (format (current-error-port)
                        (N_ "The following package would be installed:~%~{~a~%~}~%"