gnu: tlp: Install all files.

* gnu/packages/linux.scm (tlp)[arguments]: Add ‘fix-installation’ phase so
the installation no longer aborts half-way, and use ‘zero?’ in the install
phase so this cannot go undetected again.
master
Tobias Geerinckx-Rice 2017-05-03 17:22:33 +02:00
parent 69daee23af
commit cef3f14644
No known key found for this signature in database
GPG Key ID: 91CCDB9B48541B99
1 changed files with 7 additions and 3 deletions

View File

@ -3658,7 +3658,7 @@ Light is the successor of lightscript.")
(arguments
`(#:phases
(modify-phases %standard-phases
(delete 'configure)
(delete 'configure) ; no configure script
(add-before 'build 'setenv
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")))
@ -3673,10 +3673,14 @@ Light is the successor of lightscript.")
(setenv "TLP_SHCPL"
(string-append out "/share/bash-completion/completions"))
(setenv "TLP_MAN" (string-append out "/share/man")))))
(delete 'check)
(delete 'check) ; no tests
(add-before 'install 'fix-installation
(lambda _
;; Stop the Makefile from trying to create system directories.
(substitute* "Makefile" (("\\[ -f \\$\\(_CONF\\) \\]") "#"))))
(replace 'install
(lambda _
(system "make install-tlp install-man")))
(zero? (system* "make" "install-tlp" "install-man"))))
(add-after 'install 'wrap
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((bin (string-append (assoc-ref outputs "out") "/bin"))