guix_mirror_bot pushed a commit to branch master
in repository guix.
commit 4dc3ca546c772309e2d59b05f41a1df1fc01517b
Author: Cayetano Santos <[email protected]>
AuthorDate: Wed Sep 24 13:51:56 2025 +0200
gnu: lm-sensors: Improve style.
* gnu/packages/linux.scm (lm-sensors)[arguments]: Use G-Expressions.
Change-Id: Ia22080afe1aa52fd9f37df5c5711a3df174beb1c
Signed-off-by: Andreas Enge <[email protected]>
---
gnu/packages/linux.scm | 90 ++++++++++++++++++++++++--------------------------
1 file changed, 43 insertions(+), 47 deletions(-)
diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index b04cae43e2..f59a21a8ff 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -5983,56 +5983,52 @@ information on country-specific regulations for the
wireless spectrum.")
(base32 "0p2ck8p9zb1w53l37pvm6c10vi6r8bfz51nd3sdwwsfhfhgvsr0j"))
(patches (search-patches "lm-sensors-hwmon-attrs.patch"))))
(build-system gnu-build-system)
- (inputs (list rrdtool perl kmod gnuplot))
- (native-inputs (list pkg-config flex bison which))
(outputs '("lib" ; avoid perl in closure
"out"))
(arguments
- `(#:tests? #f ; no 'check' target
- #:make-flags (list (string-append "PREFIX=" %output)
- (string-append "ETCDIR=" (assoc-ref %outputs "lib")
"/etc")
- (string-append "INCLUDEDIR="
- (assoc-ref %outputs "lib") "/include")
- (string-append "MANDIR=" %output "/share/man")
- (string-append "LIBDIR=" (assoc-ref %outputs "lib")
"/lib"))
- #:phases
- (modify-phases %standard-phases
- (delete 'configure)
- (add-before 'build 'patch-exec-paths
- (lambda* (#:key inputs outputs #:allow-other-keys)
- (substitute* "prog/detect/sensors-detect"
- (("`uname")
- (string-append "`" (assoc-ref inputs "coreutils")
- "/bin/uname"))
- (("(`|\")modprobe" all open-quote)
- (string-append open-quote
- (assoc-ref inputs "kmod")
- "/bin/modprobe")))
- (substitute* '("prog/pwm/pwmconfig"
- "prog/pwm/fancontrol")
- (("gnuplot")
- (search-input-file inputs "/bin/gnuplot"))
- (("cat ")
- (string-append (search-input-file inputs "/bin/cat")
- " "))
- (("e?grep " match)
- (string-append (search-input-file inputs
- (string-append
- "/bin/"
- (string-trim-right match)))
- " "))
- (("sed -e")
- (string-append (search-input-file inputs "/bin/sed")
- " -e"))
- (("cut -d")
- (string-append (search-input-file inputs "/bin/cut")
- " -d"))
- (("sleep ")
- (string-append (search-input-file inputs "/bin/sleep")
- " "))
- (("readlink -f")
- (string-append (search-input-file inputs "/bin/readlink")
- " -f"))))))))
+ (list
+ #:tests? #f ; no 'check' target
+ #:make-flags
+ #~(list (string-append "PREFIX=" #$output)
+ (string-append "ETCDIR=" #$output:lib "/etc")
+ (string-append "INCLUDEDIR=" #$output:lib "/include")
+ (string-append "MANDIR=" #$output "/share/man")
+ (string-append "LIBDIR=" #$output:lib "/lib"))
+ #:phases
+ #~(modify-phases %standard-phases
+ (delete 'configure)
+ (add-before 'build 'patch-exec-paths
+ (lambda* (#:key inputs #:allow-other-keys)
+ (substitute* "prog/detect/sensors-detect"
+ (("`uname")
+ (string-append
+ "`" (assoc-ref inputs "coreutils") "/bin/uname"))
+ (("(`|\")modprobe" all open-quote)
+ (string-append
+ open-quote #$(this-package-input "kmod") "/bin/modprobe")))
+ (substitute* '("prog/pwm/pwmconfig" "prog/pwm/fancontrol")
+ (("gnuplot")
+ (search-input-file inputs "/bin/gnuplot"))
+ (("cat ")
+ (string-append (search-input-file inputs "/bin/cat") " "))
+ (("e?grep " match)
+ (string-append
+ (search-input-file
+ inputs (string-append "/bin/" (string-trim-right match)))
+ " "))
+ (("sed -e")
+ (string-append (search-input-file inputs "/bin/sed") " -e"))
+ (("cut -d")
+ (string-append (search-input-file inputs "/bin/cut") " -d"))
+ (("sleep ")
+ (string-append (search-input-file inputs "/bin/sleep") " "))
+ (("readlink -f")
+ (string-append
+ (search-input-file inputs "/bin/readlink") " -f"))))))))
+ (inputs
+ (list gnuplot kmod perl rrdtool))
+ (native-inputs
+ (list bison flex pkg-config which))
(home-page "https://hwmon.wiki.kernel.org/lm_sensors";)
(synopsis "Utilities to read temperature/voltage/fan sensors")
(description
