From a8aa84af395246b3b2ac6ace62a5d611737d1f55 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Fri, 19 Jun 2015 22:22:15 +0200 Subject: size: Remove unused variables. * guix/scripts/size.scm (ensure-store-item): Remove #:dry-run? parameter. (%options): Remove 'dry-run?' variable. --- guix/scripts/size.scm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/guix/scripts/size.scm b/guix/scripts/size.scm index 41dd6043a7..2fe2f02356 100644 --- a/guix/scripts/size.scm +++ b/guix/scripts/size.scm @@ -168,8 +168,7 @@ (define (dependency-size item) (return (profile item size dependencies))))) sizes))) -(define* (ensure-store-item spec-or-item - #:key dry-run?) +(define* (ensure-store-item spec-or-item) "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 \"guile:debug\" or \"gcc-4.8\" and return its store file name." @@ -231,8 +230,7 @@ (define (guix-size . args) (('argument . file) file) (_ #f)) opts)) - (system (assoc-ref opts 'system)) - (dry-run? (assoc-ref opts 'dry-run?))) + (system (assoc-ref opts 'system))) (match files (() (leave (_ "missing store item argument\n"))) -- cgit v1.2.3