02/05: gnu: tadbit: Use G-expression.

[guix-commits]

rekado pushed a commit to branch wip-python-team
in repository guix.

commit 9f223c5b49816f06cd034548ac65aeb76e6277dd
Author: Ricardo Wurmus <rekado@elephly.net>
AuthorDate: Tue Apr 30 12:25:38 2024 +0200

    gnu: tadbit: Use G-expression.
    
    * gnu/packages/bioinformatics.scm (tadbit)[arguments]: Use G-expression.
    
    Change-Id: I4fe4afc41eb3442f243b0e415ddcb363be36ce7f
---
 gnu/packages/bioinformatics.scm | 45 ++++++++++++++++++++---------------------
 1 file changed, 22 insertions(+), 23 deletions(-)

diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index 746c78b596..8cae47a9da 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -14113,29 +14113,28 @@ applications for tackling some common problems in a 
user-friendly way.")
                   "17nwlvjgqpa7x6jgh56m3di61ynaz34kl1jamyv7r2a5rhfcbkla"))))
       (build-system python-build-system)
       (arguments
-       `(#:phases
-         (modify-phases %standard-phases
-           (add-after 'unpack 'fix-problems-with-setup.py
-             (lambda* (#:key outputs #:allow-other-keys)
-               (substitute* "src/test/Makefile"
-                 (("^CFLAGS=") "CFLAGS= -fcommon"))
-
-               ;; Don't attempt to install the bash completions to
-               ;; the home directory.
-               (rename-file "extras/.bash_completion"
-                            "extras/tadbit")
-               (substitute* "setup.py"
-                 (("\\(path.expanduser\\('~'\\)")
-                  (string-append "(\""
-                                 (assoc-ref outputs "out")
-                                 "/etc/bash_completion.d\""))
-                 (("extras/\\.bash_completion")
-                  "extras/tadbit"))))
-           (replace 'check
-             (lambda* (#:key tests? inputs outputs #:allow-other-keys)
-               (when tests?
-                 (add-installed-pythonpath inputs outputs)
-                 (invoke "python3" "test/test_all.py")))))))
+       (list
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-after 'unpack 'fix-problems-with-setup.py
+              (lambda _
+                (substitute* "src/test/Makefile"
+                  (("^CFLAGS=") "CFLAGS= -fcommon"))
+
+                ;; Don't attempt to install the bash completions to
+                ;; the home directory.
+                (rename-file "extras/.bash_completion"
+                             "extras/tadbit")
+                (substitute* "setup.py"
+                  (("\\(path.expanduser\\('~'\\)")
+                   (string-append "(\"" #$output
+                                  "/etc/bash_completion.d\""))
+                  (("extras/\\.bash_completion")
+                   "extras/tadbit"))))
+            (replace 'check
+              (lambda* (#:key tests? #:allow-other-keys)
+                (when tests?
+                  (invoke "python3" "test/test_all.py")))))))
       (native-inputs
        (list `(,glib "bin") ;for gtester
              glib