From 35a0bb9691e32f7e8027bcf9016ebbc64b74cbcd Mon Sep 17 00:00:00 2001 From: "Paul A. Patience" Date: Fri, 29 Dec 2023 12:17:57 +0000 Subject: [PATCH] gnu: cl-flexi-streams: Improve package style. * gnu/packages/lisp-xyz.scm (sbcl-flexi-streams)[arguments]: Use G-expressions. Drop trailing #t in phases. [inputs]: Remove labels. Change-Id: I4aae98985435203006384906a0b28c798e3b9740 Signed-off-by: Guillaume Le Vaillant --- gnu/packages/lisp-xyz.scm | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm index 41f3056c98..9e16912988 100644 --- a/gnu/packages/lisp-xyz.scm +++ b/gnu/packages/lisp-xyz.scm @@ -1377,13 +1377,13 @@ (define-public sbcl-flexi-streams (base32 "04azqvz11s8dngy49bjl19hrfn0ip1b7m0szm4hlppq364msil7b")))) (build-system asdf-build-system/sbcl) (arguments - `(#:phases - (modify-phases %standard-phases - (add-after 'unpack 'make-git-checkout-writable - (lambda _ - (for-each make-file-writable (find-files ".")) - #t))))) - (inputs `(("trivial-gray-streams" ,sbcl-trivial-gray-streams))) + (list #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'make-git-checkout-writable + (lambda _ + (for-each make-file-writable (find-files "."))))))) + (inputs + (list sbcl-trivial-gray-streams)) (synopsis "Implementation of virtual bivalent streams for Common Lisp") (description "Flexi-streams is an implementation of \"virtual\" bivalent streams that can be layered atop real binary or bivalent streams and that can