diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2023-07-09 02:00:04 +0200 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2023-07-16 02:00:14 +0200 |
| commit | 3135d2cbfb85f7ede123d0af6ef2bdf8b4b1cb8d (patch) | |
| tree | 2051aa456917942949e66286b428376ba5cfd8e9 | |
| parent | a22a6c4ce59e54260919da30b06cb58f933a0f8e (diff) | |
| download | guix-3135d2cbfb85f7ede123d0af6ef2bdf8b4b1cb8d.tar.gz | |
gnu: zchunk: Use G-expressions.
* gnu/packages/compression.scm (zchunk)[arguments]: Rewrite as G-expressions. Use SEARCH-INPUT-FILE.
| -rw-r--r-- | gnu/packages/compression.scm | 15 |
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 |