futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

size: Remove unused variables.

Browse Source 
* guix/scripts/size.scm (ensure-store-item): Remove #:dry-run? parameter.
  (%options): Remove 'dry-run?' variable.
This commit is contained in:
Ludovic Courtès 2015-06-19 22:22:15 +02:00
parent bf76d98789
commit a8aa84af39
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
guix/scripts/size.scm
View File

@ -168,8 +168,7 @@ profile of ITEM and its requisites."
(return (profile item size dependencies))))) (return (profile item size dependencies)))))
sizes))) sizes)))
(define* (ensure-store-item spec-or-item (define* (ensure-store-item spec-or-item)
#:key dry-run?)
"Return a store file name. If SPEC-OR-ITEM is a store file name, return it "Return a store file name. If SPEC-OR-ITEM is a store file name, return it
as is. Otherwise, assume SPEC-OR-ITEM is a package output specification such as is. Otherwise, assume SPEC-OR-ITEM is a package output specification such
as \"guile:debug\" or \"gcc-4.8\" and return its store file name." as \"guile:debug\" or \"gcc-4.8\" and return its store file name."
@ -231,8 +230,7 @@ Report the size of PACKAGE and its dependencies.\n"))
(('argument . file) file) (('argument . file) file)
(_ #f)) (_ #f))
opts)) opts))
(system (assoc-ref opts 'system)) (system (assoc-ref opts 'system)))
(dry-run? (assoc-ref opts 'dry-run?)))
(match files (match files
(() (()
(leave (_ "missing store item argument\n"))) (leave (_ "missing store item argument\n")))