nckx pushed a commit to branch master
in repository guix.
commit 0cdc984147b45399199336511fe2e1118f2b7599
Author: Tobias Geerinckx-Rice <[email protected]>
AuthorDate: Mon Oct 4 05:04:17 2021 +0200
gnu: brasero: Embed growisofs from dvd+rw-tools input.
* gnu/packages/gnome.scm (brasero)[arguments]: Rename the
'embed-growisofs phase to 'embed-growisofs-reference. Get its
growisofs file name from the dvd+rw-tools input, not WHICH.
---
gnu/packages/gnome.scm | 9 +++++----
1 file changed, 5 insertions(+), 4 deletions(-)
diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index a8eb41c..18c6018 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -300,11 +300,12 @@
"/lib/girepository-1.0"))
#:phases
(modify-phases %standard-phases
- (add-before 'configure 'embed-growisofs
+ (add-before 'configure 'embed-growisofs-reference
(lambda* (#:key inputs #:allow-other-keys)
- (substitute* "plugins/growisofs/burn-growisofs.c"
- (("\"growisofs") (string-append "\"" (which "growisofs"))))
- #t)))))
+ (let ((dvd+rw-tools (assoc-ref inputs "dvd+rw-tools")))
+ (substitute* "plugins/growisofs/burn-growisofs.c"
+ (("(\")(growisofs)" _ prefix command)
+ (string-append prefix dvd+rw-tools "/bin/" command)))))))))
(propagated-inputs
`(("hicolor-icon-theme" ,hicolor-icon-theme)))
(native-inputs
