diff options
Diffstat (limited to 'guix/gnu-maintenance.scm')
-rw-r--r-- | guix/gnu-maintenance.scm | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/guix/gnu-maintenance.scm b/guix/gnu-maintenance.scm index e39094db72..b54cd84ecf 100644 --- a/guix/gnu-maintenance.scm +++ b/guix/gnu-maintenance.scm @@ -32,6 +32,7 @@ #:use-module (guix ftp-client) #:use-module (guix ui) #:use-module (guix utils) + #:use-module (guix records) #:use-module (guix packages) #:use-module ((guix download) #:select (download-to-store)) #:use-module (guix gnupg) @@ -150,12 +151,6 @@ (remove null-list? state) (match-field line)))) - (define (alist->record alist make keys) - ;; Apply MAKE, which should be a syntactic constructor, to the - ;; values associated with KEYS in ALIST. - (let ((args (map (cut assoc-ref alist <>) keys))) - (apply make args))) - (reverse (map (lambda (alist) (alist->record alist |