[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/02: gnu: tlp: Return #t from phases.
From: |
Tobias Geerinckx-Rice |
Subject: |
01/02: gnu: tlp: Return #t from phases. |
Date: |
Wed, 10 Oct 2018 18:21:05 -0400 (EDT) |
nckx pushed a commit to branch master
in repository guix.
commit 272fc9dca35c06d431e59e68a2a05ed8c2c3ce96
Author: Tobias Geerinckx-Rice <address@hidden>
Date: Wed Oct 10 23:54:17 2018 +0200
gnu: tlp: Return #t from phases.
* gnu/packages/linux.scm (tlp)[argument]: Return #t all from phases.
---
gnu/packages/linux.scm | 9 ++++++---
1 file changed, 6 insertions(+), 3 deletions(-)
diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index 9b16083..344f3ea 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -4250,12 +4250,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"))
- (setenv "TLP_META" (string-append out "/share/metainfo")))))
+ (setenv "TLP_META" (string-append out "/share/metainfo"))
+ #t)))
(delete 'check) ; no tests
(add-before 'install 'fix-installation
(lambda _
;; Stop the Makefile from trying to create system directories.
- (substitute* "Makefile" (("\\[ -f \\$\\(_CONF\\) \\]") "#"))))
+ (substitute* "Makefile" (("\\[ -f \\$\\(_CONF\\) \\]") "#"))
+ #t))
(replace 'install
(lambda _
(invoke "make" "install-tlp" "install-man")
@@ -4289,7 +4291,8 @@ Light is the successor of lightscript.")
"pciutils"
"rfkill"
"wireless-tools"))))))
- bin-files)))))))
+ bin-files)
+ #t))))))
(home-page "http://linrunner.de/en/tlp/tlp.html")
(synopsis "Power management tool for Linux")
(description "TLP is a power management tool for Linux. It comes with