gnu: thinkfan: Update to 1.0.2.
* gnu/packages/linux.scm (thinkfan): Update to 1.0.2. [arguments]: Adjust source directory.
This commit is contained in:
parent
9eb7cde0e8
commit
9a3d176ee1
|
@ -98,6 +98,7 @@
|
||||||
#:use-module (gnu packages readline)
|
#:use-module (gnu packages readline)
|
||||||
#:use-module (gnu packages rrdtool)
|
#:use-module (gnu packages rrdtool)
|
||||||
#:use-module (gnu packages samba)
|
#:use-module (gnu packages samba)
|
||||||
|
#:use-module (gnu packages serialization)
|
||||||
#:use-module (gnu packages slang)
|
#:use-module (gnu packages slang)
|
||||||
#:use-module (gnu packages storage)
|
#:use-module (gnu packages storage)
|
||||||
#:use-module (gnu packages texinfo)
|
#:use-module (gnu packages texinfo)
|
||||||
|
@ -3483,29 +3484,26 @@ feature, and a laptop with an accelerometer. It has no effect on SSDs.")
|
||||||
(define-public thinkfan
|
(define-public thinkfan
|
||||||
(package
|
(package
|
||||||
(name "thinkfan")
|
(name "thinkfan")
|
||||||
(version "0.9.3")
|
(version "1.0.2")
|
||||||
(source (origin
|
(source
|
||||||
(method url-fetch)
|
(origin
|
||||||
(uri (string-append "mirror://sourceforge/thinkfan/"
|
(method git-fetch)
|
||||||
"/thinkfan-" version ".tar.gz"))
|
(uri (git-reference
|
||||||
(sha256
|
(url "https://github.com/vmatare/thinkfan.git")
|
||||||
(base32
|
(commit version)))
|
||||||
"0nz4c48f0i0dljpk5y33c188dnnwg8gz82s4grfl8l64jr4n675n"))
|
(file-name (git-file-name name version))
|
||||||
(modules '((guix build utils)))
|
(sha256
|
||||||
;; Fix erroneous man page location in Makefile leading to
|
(base32 "107vw0962hrwva3wra9n3hxlbfzg82ldc10qssv3dspja88g8psr"))))
|
||||||
;; a compilation failure.
|
|
||||||
(snippet '(begin
|
|
||||||
(substitute* "CMakeLists.txt"
|
|
||||||
(("thinkfan\\.1") "src/thinkfan.1"))
|
|
||||||
#t))))
|
|
||||||
(build-system cmake-build-system)
|
(build-system cmake-build-system)
|
||||||
(arguments
|
(arguments
|
||||||
`(#:modules ((guix build cmake-build-system)
|
`(#:modules ((guix build cmake-build-system)
|
||||||
(guix build utils)
|
(guix build utils)
|
||||||
(srfi srfi-26))
|
(srfi srfi-26))
|
||||||
#:tests? #f ;no test target
|
#:tests? #f ; no test target
|
||||||
#:configure-flags
|
#:configure-flags
|
||||||
;; Enable reading temperatures from hard disks via S.M.A.R.T.
|
;; Enable reading temperatures from hard disks via S.M.A.R.T.
|
||||||
|
;; Upstream ‘defaults to OFF because libatasmart seems to be horribly
|
||||||
|
;; inefficient’.
|
||||||
`("-DUSE_ATASMART:BOOL=ON")
|
`("-DUSE_ATASMART:BOOL=ON")
|
||||||
#:phases
|
#:phases
|
||||||
(modify-phases %standard-phases
|
(modify-phases %standard-phases
|
||||||
|
@ -3514,9 +3512,7 @@ feature, and a laptop with an accelerometer. It has no effect on SSDs.")
|
||||||
(add-after 'install 'install-rc-scripts
|
(add-after 'install 'install-rc-scripts
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
(let ((out (assoc-ref outputs "out"))
|
(let ((out (assoc-ref outputs "out"))
|
||||||
(files (find-files
|
(files (find-files "../source/rcscripts" ".*")))
|
||||||
(string-append "../thinkfan-" ,version "/rcscripts")
|
|
||||||
".*")))
|
|
||||||
(substitute* files
|
(substitute* files
|
||||||
(("/usr/sbin/(\\$NAME|thinkfan)" _ name)
|
(("/usr/sbin/(\\$NAME|thinkfan)" _ name)
|
||||||
(string-append out "/sbin/" name)))
|
(string-append out "/sbin/" name)))
|
||||||
|
@ -3524,8 +3520,11 @@ feature, and a laptop with an accelerometer. It has no effect on SSDs.")
|
||||||
(string-append out "/share/thinkfan"))
|
(string-append out "/share/thinkfan"))
|
||||||
files))
|
files))
|
||||||
#t)))))
|
#t)))))
|
||||||
|
(native-inputs
|
||||||
|
`(("pkg-config" ,pkg-config)))
|
||||||
(inputs
|
(inputs
|
||||||
`(("libatasmart" ,libatasmart)))
|
`(("libatasmart" ,libatasmart)
|
||||||
|
("yaml-cpp" ,yaml-cpp)))
|
||||||
(home-page "http://thinkfan.sourceforge.net/")
|
(home-page "http://thinkfan.sourceforge.net/")
|
||||||
(synopsis "Simple fan control program")
|
(synopsis "Simple fan control program")
|
||||||
(description
|
(description
|
||||||
|
|
Loading…
Reference in New Issue