[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/03: gnu: tlp: Remove obsolete #t returns.
From: |
guix-commits |
Subject: |
03/03: gnu: tlp: Remove obsolete #t returns. |
Date: |
Sat, 8 Jan 2022 16:05:32 -0500 (EST) |
nckx pushed a commit to branch master
in repository guix.
commit c612b619cc310a013f2a69c36fcaa0aedc38c1df
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Sat Jan 8 06:28:25 2022 +0100
gnu: tlp: Remove obsolete #t returns.
* gnu/packages/linux.scm (tlp)[arguments]:
Don't explicitly return #t from phases.
---
gnu/packages/linux.scm | 9 +++------
1 file changed, 3 insertions(+), 6 deletions(-)
diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index 22ce16a596..7b3996f770 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -6956,15 +6956,13 @@ interface in sysfs, which can be accomplished with the
included udev rules.")
(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"))
- #t)))
+ (setenv "TLP_META" (string-append out "/share/metainfo")))))
(add-before 'install 'fix-installation
(lambda _
;; Stop the Makefile from trying to create system directories.
(substitute* "Makefile"
(("\\[ -f \\$\\(_CONFUSR\\) \\]") "#")
- (("install -d -m 755 \\$\\(_VAR\\)") "#"))
- #t))
+ (("install -d -m 755 \\$\\(_VAR\\)") "#"))))
(replace 'install
(lambda _ (invoke "make" "install-tlp" "install-man-tlp")))
(add-after 'install 'wrap
@@ -7000,8 +6998,7 @@ interface in sysfs, which can be accomplished with the
included udev rules.")
"pciutils"
"rfkill"
"wireless-tools"))))))
- bin-files)
- #t))))))
+ bin-files)))))))
(home-page "https://linrunner.de/en/tlp/tlp.html")
(synopsis "Power management tool for Linux")
(description "TLP is a power management tool for Linux. It comes with