05/06: pull: Use SRFI-71 instead of SRFI-11.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit f386a993ef9b75e37d708aee5f78312f7bcc9425
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Mon Jun 28 23:36:50 2021 +0200

    pull: Use SRFI-71 instead of SRFI-11.
    
    * guix/scripts/pull.scm (display-new/upgraded-packages): Use SRFI-71 'let'.
---
 guix/scripts/pull.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/guix/scripts/pull.scm b/guix/scripts/pull.scm
index c880a5b..fb8ce50 100644
--- a/guix/scripts/pull.scm
+++ b/guix/scripts/pull.scm
@@ -51,11 +51,11 @@
   #:autoload   (gnu packages bootstrap) (%bootstrap-guile)
   #:autoload   (gnu packages certs) (le-certs)
   #:use-module (srfi srfi-1)
-  #:use-module (srfi srfi-11)
   #:use-module (srfi srfi-26)
   #:use-module (srfi srfi-34)
   #:use-module (srfi srfi-35)
   #:use-module (srfi srfi-37)
+  #:use-module (srfi srfi-71)
   #:use-module (ice-9 match)
   #:use-module (ice-9 vlist)
   #:use-module (ice-9 format)
@@ -601,7 +601,7 @@ Return true when there is more package info to display."
               (string-join lst ", ")))
         (cut string-join <> ", ")))
 
-  (let-values (((new upgraded) (new/upgraded-packages alist1 alist2)))
+  (let ((new upgraded (new/upgraded-packages alist1 alist2)))
     (define new-count (length new))
     (define upgraded-count (length upgraded))