[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/02: gnu: dvd+rw-tools: Use invoke.
From: |
Efraim Flashner |
Subject: |
02/02: gnu: dvd+rw-tools: Use invoke. |
Date: |
Sat, 10 Nov 2018 12:59:50 -0500 (EST) |
efraim pushed a commit to branch core-updates
in repository guix.
commit efe0a4a2a7ece13c855a1f316ad49bcdbfa1596f
Author: Efraim Flashner <address@hidden>
Date: Sat Nov 10 19:58:28 2018 +0200
gnu: dvd+rw-tools: Use invoke.
* gnu/packages/cdrom.scm (dvd+rw-tools): Use 'invoke'.
---
gnu/packages/cdrom.scm | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/gnu/packages/cdrom.scm b/gnu/packages/cdrom.scm
index 992c204..ccb2766 100644
--- a/gnu/packages/cdrom.scm
+++ b/gnu/packages/cdrom.scm
@@ -303,14 +303,14 @@ images.")
(replace 'configure
(lambda _ (setenv "prefix" (assoc-ref %outputs "out")) #t))
(add-before 'build 'embed-mkisofs
- (lambda* (#:key inputs #:allow-other-keys)
+ (lambda* (#:key inputs #:allow-other-keys)
;; We use sed --in-place because substitute* cannot handle the
;; character encoding used by growisofs.c.
- (zero? (system* "sed" "-i" "-e"
- (string-append
- "s,\"mkisofs\","
- "\"" (which "mkisofs") "\",")
- "growisofs.c")))))))
+ (invoke "sed" "-i" "-e"
+ (string-append
+ "s,\"mkisofs\","
+ "\"" (which "mkisofs") "\",")
+ "growisofs.c"))))))
(home-page "http://fy.chalmers.se/~appro/linux/DVD+RW/")
(synopsis "DVD and Blu-ray Disc burning tools")
(description "dvd+rw-tools, mostly known for its command