summary refs log tree commit diff
diff options
context:
space:
mode:
authorXinglu Chen <public@yoctocell.xyz>2021-11-08 11:02:06 +0100
committerLudovic Courtès <ludo@gnu.org>2021-11-17 23:05:57 +0100
commit77483d6b61ca7a706acb07fd9e7b6ee269a93562 (patch)
tree573fe3af2552df373ffbac1b4dc8523675749f7f
parent4ace6455063297e6de84a9a2477150a6ce9416d8 (diff)
downloadguix-77483d6b61ca7a706acb07fd9e7b6ee269a93562.tar.gz
gnu: perl-inline-c: Patch paths to ‘make’.
* gnu/packages/perl.scm (perl-inline-c)[arguments]<#:phases>{patch-paths}: New
  phase.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
-rw-r--r--gnu/packages/perl.scm11
1 files changed, 11 insertions, 0 deletions
diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm
index 838e942cca..5973805a75 100644
--- a/gnu/packages/perl.scm
+++ b/gnu/packages/perl.scm
@@ -5399,6 +5399,17 @@ for immediate access from Perl.")
         (base32
          "1b3sr39813di3j1kwbgn1xq2z726rhjjdw809ydzgmshj26jb1gi"))))
     (build-system perl-build-system)
+    (arguments
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'patch-paths
+           (lambda* (#:key inputs #:allow-other-keys)
+             (let ((make (assoc-ref inputs "make")))
+             (substitute* "lib/Inline/C.pm"
+               (("'\"make\"'")
+                (string-append "'\"" make "/bin/make\"'"))
+               (("'\"make install\"'")
+                (string-append "'\"" make "/bin/make install\"'")))))))))
     (native-inputs
      `(("perl-file-copy-recursive" ,perl-file-copy-recursive)
        ("perl-file-sharedir-install" ,perl-file-sharedir-install)