summary refs log tree commit diff
path: root/gnu/packages/compression.scm
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2023-07-09 02:00:04 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2023-07-16 02:00:14 +0200
commit3135d2cbfb85f7ede123d0af6ef2bdf8b4b1cb8d (patch)
tree2051aa456917942949e66286b428376ba5cfd8e9 /gnu/packages/compression.scm
parenta22a6c4ce59e54260919da30b06cb58f933a0f8e (diff)
downloadguix-3135d2cbfb85f7ede123d0af6ef2bdf8b4b1cb8d.tar.gz
gnu: zchunk: Use G-expressions.
* gnu/packages/compression.scm (zchunk)[arguments]:
Rewrite as G-expressions.  Use SEARCH-INPUT-FILE.
Diffstat (limited to 'gnu/packages/compression.scm')
-rw-r--r--gnu/packages/compression.scm15
1 files changed, 8 insertions, 7 deletions
diff --git a/gnu/packages/compression.scm b/gnu/packages/compression.scm
index 57b87ac1d2..63b6858afe 100644
--- a/gnu/packages/compression.scm
+++ b/gnu/packages/compression.scm
@@ -2373,13 +2373,14 @@ reading from and writing to ZIP archives.")
                 "19rw870150w1c730wzg2pn68ixmscq8cwa3vricqhwxs5l63r5wr"))))
     (build-system meson-build-system)
     (arguments
-     `(#:phases (modify-phases %standard-phases
-                  (add-after 'unpack 'patch-paths
-                    (lambda* (#:key inputs #:allow-other-keys)
-                      (substitute* "src/zck_gen_zdict.c"
-                        (("/usr/bin/zstd")
-                         (string-append (assoc-ref inputs "zstd")
-                                        "/bin/zstd"))))))))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'patch-file-name
+            (lambda* (#:key inputs #:allow-other-keys)
+              (substitute* "src/zck_gen_zdict.c"
+                (("/usr/(bin/zstd)" _ file)
+                 (string-append (search-input-file inputs file)))))))))
     (native-inputs
      (list pkg-config))
     (inputs