diff mbox series

[bug#51684] gnu: perl-inline-c: Patch paths to ‘make’.

Message ID cbc05966175d6a423bf07963494460031ef962a0.1636365709.git.public@yoctocell.xyz
State Accepted
Headers show
Series [bug#51684] gnu: perl-inline-c: Patch paths to ‘make’. | expand

Checks

Context Check Description
cbaines/comparison success View comparision
cbaines/git branch success View Git branch
cbaines/applying patch success View Laminar job
cbaines/issue success View issue

Commit Message

Xinglu Chen Nov. 8, 2021, 10:02 a.m. UTC
* gnu/packages/perl.scm (perl-inline-c)[arguments]<#:phases>{patch-paths}: New
  phase.
---
 gnu/packages/perl.scm | 11 +++++++++++
 1 file changed, 11 insertions(+)


base-commit: f52719dfad7b7d3beb2b1211b6846196f3590823

Comments

Ludovic Courtès Nov. 17, 2021, 3:21 p.m. UTC | #1
Hello,

Xinglu Chen <public@yoctocell.xyz> skribis:

> * gnu/packages/perl.scm (perl-inline-c)[arguments]<#:phases>{patch-paths}: New
>   phase.

Applied, thanks!

Ludo’.
diff mbox series

Patch

diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm
index 5d4843d39a..166ed5230c 100644
--- a/gnu/packages/perl.scm
+++ b/gnu/packages/perl.scm
@@ -5399,6 +5399,17 @@  (define-public perl-inline-c
         (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)