~ruther/guix-local

a2ed73898985ca7b593ad9f7ea10a324c093bab5 — Ludovic Courtès 13 years ago ce3b7a6
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(-)

M guix/scripts/package.scm
M guix/scripts/package.scm => guix/scripts/package.scm +3 -3
@@ 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~%~}~%"