diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2023-03-07 15:48:01 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2023-03-13 15:08:33 +0100 |
| commit | 5dd0d7f99f4a71a6ed4a2dab66d32e4b7ed2b70c (patch) | |
| tree | 7fca0f1e2736a75e80ded9ca7c1d56b61085451d /guix/packages.scm | |
| parent | 266a9f9d973a3bc11cc86f03576da09aefab08f3 (diff) | |
| download | guix-5dd0d7f99f4a71a6ed4a2dab66d32e4b7ed2b70c.tar guix-5dd0d7f99f4a71a6ed4a2dab66d32e4b7ed2b70c.tar.gz | |
packages: Use SRFI-71 instead of SRFI-11.
* guix/packages.scm (package-input-rewriting/spec): Use SRFI-71 'let'.
Diffstat (limited to 'guix/packages.scm')
| -rw-r--r-- | guix/packages.scm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/guix/packages.scm b/guix/packages.scm index 7b098e21f0..ca958c6eae 100644 --- a/guix/packages.scm +++ b/guix/packages.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2012-2022 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2012-2023 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2014, 2015, 2017, 2018, 2019 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2015 Eric Bavier <bavier@member.fsf.org> ;;; Copyright © 2016 Alex Kost <alezost@gmail.com> @@ -52,10 +52,10 @@ #:use-module (ice-9 regex) #:use-module (srfi srfi-1) #:use-module (srfi srfi-9 gnu) - #:use-module (srfi srfi-11) #:use-module (srfi srfi-26) #:use-module (srfi srfi-34) #:use-module (srfi srfi-35) + #:use-module (srfi srfi-71) #:use-module (rnrs bytevectors) #:use-module (web uri) #:autoload (texinfo) (texi-fragment->stexi) @@ -1540,8 +1540,7 @@ matching package and returns a replacement for that package." (fold (lambda (replacement table) (match replacement ((spec . proc) - (let-values (((name version) - (package-name->name+version spec))) + (let ((name version (package-name->name+version spec))) (vhash-cons name (list version proc) table))))) vlist-null replacements)) |