guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

01/03: size: Remove unused variables.


From: Ludovic Courtès
Subject: 01/03: size: Remove unused variables.
Date: Sun, 21 Jun 2015 21:39:20 +0000

civodul pushed a commit to branch master
in repository guix.

commit a8aa84af395246b3b2ac6ace62a5d611737d1f55
Author: Ludovic Courtès <address@hidden>
Date:   Fri Jun 19 22:22:15 2015 +0200

    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 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/guix/scripts/size.scm b/guix/scripts/size.scm
index 41dd604..2fe2f02 100644
--- a/guix/scripts/size.scm
+++ b/guix/scripts/size.scm
@@ -168,8 +168,7 @@ profile of ITEM and its requisites."
                (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 @@ Report the size of PACKAGE and its dependencies.\n"))
                                    (('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")))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]