01/19: gnu: qtltools: Replace references to %build-inputs.

[guix-commits]

rekado pushed a commit to branch core-updates-frozen
in repository guix.

commit a5663a7c8a2c7d962dcb82e3e1c89141cd0f060b
Author: Ricardo Wurmus <rekado@elephly.net>
AuthorDate: Fri Dec 3 23:26:48 2021 +0100

    gnu: qtltools: Replace references to %build-inputs.
    
    * gnu/packages/bioinformatics.scm (qtltools)[arguments]: Use a gexp instead 
of
    referencing %build-inputs.
---
 gnu/packages/bioinformatics.scm | 28 ++++++++++++++--------------
 1 file changed, 14 insertions(+), 14 deletions(-)

diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index be3fce6..070d6bd 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -1514,20 +1514,20 @@ long-read sequencing data.")
     (arguments
      `(#:tests? #f                      ; no tests included
        #:make-flags
-       (list (string-append "BOOST_INC="
-                            (assoc-ref %build-inputs "boost") "/include")
-             (string-append "BOOST_LIB="
-                            (assoc-ref %build-inputs "boost") "/lib")
-             (string-append "HTSLD_INC="
-                            (assoc-ref %build-inputs "htslib") "/include")
-             (string-append "HTSLD_LIB="
-                            (assoc-ref %build-inputs "htslib") "/lib")
-             (string-append "RMATH_INC="
-                            (assoc-ref %build-inputs "rmath-standalone")
-                            "/include")
-             (string-append "RMATH_LIB="
-                            (assoc-ref %build-inputs "rmath-standalone")
-                            "/lib"))
+       ,#~(list (string-append "BOOST_INC="
+                               #$(this-package-input "boost") "/include")
+                (string-append "BOOST_LIB="
+                               #$(this-package-input "boost") "/lib")
+                (string-append "HTSLD_INC="
+                               #$(this-package-input "htslib") "/include")
+                (string-append "HTSLD_LIB="
+                               #$(this-package-input "htslib") "/lib")
+                (string-append "RMATH_INC="
+                               #$(this-package-input "rmath-standalone")
+                               "/include")
+                (string-append "RMATH_LIB="
+                               #$(this-package-input "rmath-standalone")
+                               "/lib"))
        #:phases
        (modify-phases %standard-phases
          (add-after 'unpack 'fix-linkage