nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

guix package: Show the output name of what's being removed. 

* guix/scripts/package.scm (show-what-to-remove/install): Show the
  output name of packages being removed.
This commit is contained in:
Ludovic Courtès 2013-11-01 23:59:25 +01:00
parent 1b5ba6b1e9
commit 45b418d634
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
guix/scripts/package.scm
View File

@ -174,10 +174,10 @@ DURATION-RELATION with the current time."
packages that will/would be installed and removed." packages that will/would be installed and removed."
;; TODO: Report upgrades more clearly. ;; TODO: Report upgrades more clearly.
(match remove (match remove
((($ <manifest-entry> name version _ path _) ..1) ((($ <manifest-entry> name version output path _) ..1)
(let ((len (length name)) (let ((len (length name))
(remove (map (cut format #f " ~a-~a\t~a" <> <> <>) (remove (map (cut format #f " ~a-~a\t~a\t~a" <> <> <> <>)
name version path))) name version output path)))
(if dry-run? (if dry-run?
(format (current-error-port) (format (current-error-port)
(N_ "The following package would be removed:~%~{~a~%~}~%" (N_ "The following package would be removed:~%~{~a~%~}~%"