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.
This commit is contained in:
parent
41e24ace7d
commit
0cdc984147
1 changed files with 5 additions and 4 deletions
|
@ -300,11 +300,12 @@
|
||||||
"/lib/girepository-1.0"))
|
"/lib/girepository-1.0"))
|
||||||
#:phases
|
#:phases
|
||||||
(modify-phases %standard-phases
|
(modify-phases %standard-phases
|
||||||
(add-before 'configure 'embed-growisofs
|
(add-before 'configure 'embed-growisofs-reference
|
||||||
(lambda* (#:key inputs #:allow-other-keys)
|
(lambda* (#:key inputs #:allow-other-keys)
|
||||||
(substitute* "plugins/growisofs/burn-growisofs.c"
|
(let ((dvd+rw-tools (assoc-ref inputs "dvd+rw-tools")))
|
||||||
(("\"growisofs") (string-append "\"" (which "growisofs"))))
|
(substitute* "plugins/growisofs/burn-growisofs.c"
|
||||||
#t)))))
|
(("(\")(growisofs)" _ prefix command)
|
||||||
|
(string-append prefix dvd+rw-tools "/bin/" command)))))))))
|
||||||
(propagated-inputs
|
(propagated-inputs
|
||||||
`(("hicolor-icon-theme" ,hicolor-icon-theme)))
|
`(("hicolor-icon-theme" ,hicolor-icon-theme)))
|
||||||
(native-inputs
|
(native-inputs
|
||||||
|
|
Reference in a new issue