gnu: brdf-explorer: Unconditionally return #T from build phases.

* gnu/packages/graphics.scm (brdf-explorer)[arguments]: Use INVOKE and return #T.
This commit is contained in:
Ricardo Wurmus 2019-01-25 12:18:12 +01:00
parent ec7245f0db
commit cba8ba8b0d
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 4 additions and 3 deletions

View File

@ -651,8 +651,8 @@ output.")
(replace 'configure (replace 'configure
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))) (let ((out (assoc-ref outputs "out")))
(zero? (system* "qmake" (invoke "qmake"
(string-append "prefix=" out)))))) (string-append "prefix=" out)))))
(add-after 'install 'wrap-program (add-after 'install 'wrap-program
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
@ -668,7 +668,8 @@ output.")
cd \"~a\" cd \"~a\"
exec -a \"$0\" ~a/.brdf-real~%" exec -a \"$0\" ~a/.brdf-real~%"
data bin))) data bin)))
(chmod "brdf" #o555)))))))) (chmod "brdf" #o555)))
#t)))))
(native-inputs (native-inputs
`(("qttools" ,qttools))) ;for 'qmake' `(("qttools" ,qttools))) ;for 'qmake'
(inputs (inputs