gnu: express-beta-diversity: Improve style.

* gnu/packages/bioinformatics.scm (express-beta-diversity)
[arguments]<#:phases>: Use G-expressions, drop trailing #t.
[inputs]: Drop input label.

Signed-off-by: Andreas Enge <andreas@enge.fr>

1 files changed, 16 insertions, 13 deletions

diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index 447105c6abc..7d63a204788 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -8247,20 +8247,23 @@ ChIP-Seq, and analysis of metagenomic data.")
                "0s0yzg5c21349rh7x4w9266jsvnp7j1hp9cf8sk32hz8nvrj745x"))))
    (build-system gnu-build-system)
    (arguments
-    `(#:phases
-      (modify-phases %standard-phases
-        (delete 'configure)
-        (add-before 'build 'enter-source (lambda _ (chdir "source") #t))
-        (replace 'check
-          (lambda _ (invoke "../bin/ExpressBetaDiversity" "-u") #t))
-        (replace 'install
-          (lambda* (#:key outputs #:allow-other-keys)
-            (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
-              (install-file "../scripts/convertToEBD.py" bin)
-              (install-file "../bin/ExpressBetaDiversity" bin)
-              #t))))))
+    (list
+     #:phases
+     #~(modify-phases %standard-phases
+         (delete 'configure)
+         (add-before 'build 'enter-source
+           (lambda _
+             (chdir "source")))
+         (replace 'check
+           (lambda _
+             (invoke "../bin/ExpressBetaDiversity" "-u")))
+         (replace 'install
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let ((bin (string-append #$output "/bin")))
+               (install-file "../scripts/convertToEBD.py" bin)
+               (install-file "../bin/ExpressBetaDiversity" bin)))))))
    (inputs
-    `(("python" ,python-2)))
+    (list python-2))
    (home-page "https://github.com/dparks1134/ExpressBetaDiversity")
    (synopsis "Taxon- and phylogenetic-based beta diversity measures")
    (description