02/06: gnu: cl-serapeum: Use G-expressions.

[guix-commits]

glv pushed a commit to branch master
in repository guix.

commit f11b6ac9acfa246d008343f43145a60bb47ec099
Author: Paul A. Patience <paul@apatience.com>
AuthorDate: Mon Jun 13 12:26:54 2022 +0000

    gnu: cl-serapeum: Use G-expressions.
    
    * gnu/packages/lisp-xyz.scm (sbcl-serapeum)[arguments]: Use G-expressions 
and
      simplify the 'disable-failing-tests' phase.
    
    Signed-off-by: Guillaume Le Vaillant <glv@posteo.net>
---
 gnu/packages/lisp-xyz.scm | 15 +++++++--------
 1 file changed, 7 insertions(+), 8 deletions(-)

diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index e2c8e06f92..cf8af2fc89 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -7538,14 +7538,13 @@ implementation specific equivalent.")
        (list sbcl-fiveam
              sbcl-local-time))
       (arguments
-       '(#:phases
-         (modify-phases %standard-phases
-           (add-after 'unpack 'disable-failing-tests
-             (lambda* (#:key inputs #:allow-other-keys)
-               (substitute* "serapeum.asd"
-                 ;; Guix does not have Quicklisp, and probably never will.
-                 (("\\(:file \"quicklisp\"\\)") ""))
-               #t)))))
+       (list #:phases
+             #~(modify-phases %standard-phases
+                 (add-after 'unpack 'disable-failing-tests
+                   (lambda _
+                     (substitute* "serapeum.asd"
+                       ;; Guix does not have Quicklisp, and probably never 
will.
+                       (("\\(:file \"quicklisp\"\\)") "")))))))
       (synopsis "Common Lisp utility library beyond Alexandria")
       (description
        "Serapeum is a conservative library of Common Lisp utilities.  It is a