gnu: handbrake: Return #t from all phases.

* gnu/packages/video.scm (handbrake)[arguments]: Substitute INVOKE for
SYSTEM*.
This commit is contained in:
Tobias Geerinckx-Rice 2018-06-21 18:41:45 +02:00
parent bf6edb9596
commit da6f345c71
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79

View file

@ -2363,7 +2363,7 @@ (define-public handbrake
;; Patch the Makefile so that it doesn't bootstrap again.
(substitute* "gtk/module.rules"
((".*autogen\\.sh.*") ""))
(zero? (system* "sh" "./gtk/autogen.sh"))))
(invoke "sh" "./gtk/autogen.sh")))
(add-before 'configure 'disable-contrib
(lambda _
(substitute* "make/include/main.defs"
@ -2385,9 +2385,9 @@ (define-public handbrake
;; errors on unrecognized arguments,
;; e.g. --enable-fast-install
(let ((out (assoc-ref outputs "out")))
(zero? (apply system* "./configure"
(string-append "--prefix=" out)
(or configure-flags '()))))))
(apply invoke "./configure"
(string-append "--prefix=" out)
(or configure-flags '())))))
(add-after 'configure 'chdir-build
(lambda _ (chdir "./build") #t)))))
(home-page "https://handbrake.fr")