diff mbox series

[bug#57710] gnu: ghc-alex: Use G-expressions.

Message ID 20220909194116.10433-1-jgart@dismail.de
State Accepted
Headers show
Series [bug#57710] gnu: ghc-alex: Use G-expressions. | expand

Checks

Context Check Description
cbaines/comparison success View comparision
cbaines/git-branch success View Git branch
cbaines/applying patch success View Laminar job
cbaines/issue success View issue

Commit Message

jgart Sept. 9, 2022, 7:41 p.m. UTC 
* gnu/packages/containers.scm (ghc-alex)[arguments]: Use G-expressions.
[arguments]: Remove trailing booleans.
---
 gnu/packages/haskell-xyz.scm | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

Comments

Christopher Baines Sept. 12, 2022, 1:28 p.m. UTC | #1 
jgart via Guix-patches via <guix-patches@gnu.org> writes:

> * gnu/packages/containers.scm (ghc-alex)[arguments]: Use G-expressions.
> [arguments]: Remove trailing booleans.
> ---
>  gnu/packages/haskell-xyz.scm | 17 +++++++++--------
>  1 file changed, 9 insertions(+), 8 deletions(-)

Thanks, I've pushed this to master as
25d88eb9f3e22816180c099502a3a919bbe602f6.

Chris
diff mbox series

Patch

diff --git a/gnu/packages/haskell-xyz.scm b/gnu/packages/haskell-xyz.scm
index 85291896cc..9ebe3fd6ff 100644
--- a/gnu/packages/haskell-xyz.scm
+++ b/gnu/packages/haskell-xyz.scm
@@ -30,6 +30,7 @@ 
 ;;; Copyright © 2020 Christine Lemmer-Webber <cwebber@dustycloud.org>
 ;;; Copyright © 2021, 2022 Alice BRENON <alice.brenon@ens-lyon.fr>
 ;;; Copyright © 2021 John Kehayias <john.kehayias@protonmail.com>
+;;; Copyright © 2022 jgart <jgart@dismail.de>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -75,6 +76,7 @@  (define-module (gnu packages haskell-xyz)
   #:use-module (gnu packages xorg)
   #:use-module (guix build-system haskell)
   #:use-module (guix download)
+  #:use-module (guix gexp)
   #:use-module (guix git-download)
   #:use-module (guix utils)
   #:use-module ((guix licenses) #:prefix license:)
@@ -297,14 +299,13 @@  (define-public ghc-alex
          "042lrkn0dbpjn5ivj6j26jzb1fwrj8c1aj18ykxja89isg0hiali"))))
     (build-system haskell-build-system)
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-before 'check 'set-check-variables
-           (lambda _
-             (setenv "PATH" (string-append (getcwd) "/dist/build/alex:"
-                                           (getenv "PATH")))
-             (setenv "alex_datadir" (string-append (getcwd) "/data"))
-             #t)))))
+      (list #:phases
+            #~(modify-phases %standard-phases
+                (add-before 'check 'set-check-variables
+                  (lambda _
+                    (setenv "PATH" (string-append (getcwd) "/dist/build/alex:"
+                                                  (getenv "PATH")))
+                    (setenv "alex_datadir" (string-append (getcwd) "/data")))))))
     (inputs (list ghc-quickcheck))
     (native-inputs
      (list which))