summary refs log tree commit diff
path: root/gnu/packages/engineering.scm
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2023-04-24 09:53:06 +0200
committerRicardo Wurmus <rekado@elephly.net>2023-04-24 09:53:06 +0200
commite2c1506e86336b5043389742e261de9fdaab2c3d (patch)
tree2a8f6cccbd55c497c0fa3376fe91f5748aed7824 /gnu/packages/engineering.scm
parent2d4888b7912941dda45e3ec2f124ffea88262c58 (diff)
downloadguix-e2c1506e86336b5043389742e261de9fdaab2c3d.tar.gz
gnu: inspekt3d: Adjust to changes in libfive.
* gnu/packages/engineering.scm (inspekt3d)[arguments]: Use G-expression; patch
file to avoid loading removed extension; adjust name of libfive library.
Diffstat (limited to 'gnu/packages/engineering.scm')
-rw-r--r--gnu/packages/engineering.scm21
1 files changed, 11 insertions, 10 deletions
diff --git a/gnu/packages/engineering.scm b/gnu/packages/engineering.scm
index 7f073970cb..d50c167cce 100644
--- a/gnu/packages/engineering.scm
+++ b/gnu/packages/engineering.scm
@@ -975,16 +975,17 @@ language.")
                     (("2\\.2") "3.0 2.2")))))
       (build-system gnu-build-system)
       (arguments
-       `(#:phases
-         (modify-phases %standard-phases
-           (add-after 'unpack 'patch-libfive-guile-location
-             (lambda* (#:key inputs #:allow-other-keys)
-               (substitute* "inspekt3d/library.scm"
-                 (("\"libfive-guile")
-                  (string-append "\""
-                                 (assoc-ref inputs "libfive")
-                                 "/lib/libfive-guile")))
-               #t)))))
+       (list
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-after 'unpack 'patch-libfive-guile-location
+              (lambda _
+                (substitute* "inspekt3d/library.scm"
+                  (("\\(load-extension \"libfive-guile\" \"scm_init_libfive_modules\"\\)") "#t")
+                  (("\"libfive-guile")
+                   (string-append "\""
+                                  #$(this-package-input "libfive")
+                                  "/lib/libfive-stdlib"))))))))
       (native-inputs
        (list autoconf automake pkg-config))
       (inputs