summary refs log tree commit diff
path: root/gnu/packages
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2023-07-02 02:00:00 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2023-07-02 02:00:09 +0200
commit1122217f27d601727a8117a20af862b7770721cb (patch)
tree9cf22655f576e118771eff8acceb590ca699d764 /gnu/packages
parentafd09faaf93db453318902cfc4b62ff66614edd7 (diff)
downloadguix-1122217f27d601727a8117a20af862b7770721cb.tar.gz
gnu: dpkg: Use the (intended) input perl's version.
* gnu/packages/debian.scm (dpkg)[arguments]: Replace reference to the
host-side perl variable with one to the build-side "perl" input.
Diffstat (limited to 'gnu/packages')
-rw-r--r--gnu/packages/debian.scm12
1 files changed, 8 insertions, 4 deletions
diff --git a/gnu/packages/debian.scm b/gnu/packages/debian.scm
index 869571a8ce..92aa4a33e3 100644
--- a/gnu/packages/debian.scm
+++ b/gnu/packages/debian.scm
@@ -349,7 +349,10 @@ distributions such as Debian and Trisquel.")
          (base32 "0b5czgif5g6pdjzcw60hzzj0i1llxvajf3nlx115axmpa3y4iynd"))))
     (build-system gnu-build-system)
     (arguments
-     `(#:phases
+     `(#:modules
+       ((srfi srfi-71)
+        ,@%gnu-build-system-modules)
+       #:phases
        (modify-phases %standard-phases
          (add-before 'bootstrap 'patch-version
            (lambda _
@@ -358,12 +361,13 @@ distributions such as Debian and Trisquel.")
                (lambda () (display ,version)))))
          (add-after 'unpack 'set-perl-libdir
            (lambda* (#:key inputs outputs #:allow-other-keys)
-             (let ((out  (assoc-ref outputs "out"))
-                   (perl (assoc-ref inputs "perl")))
+             (let* ((out  (assoc-ref outputs "out"))
+                    (perl (assoc-ref inputs "perl"))
+                    (_ perl-version (package-name->name+version perl)))
                (setenv "PERL_LIBDIR"
                        (string-append out
                                       "/lib/perl5/site_perl/"
-                                      ,(package-version perl))))))
+                                      perl-version)))))
          (add-after 'install 'wrap-scripts
            (lambda* (#:key outputs #:allow-other-keys)
              (let ((out (assoc-ref outputs "out")))