services: linux: Remove redundant definitions

pull/1/head
Luis Guilherme Coelho 2023-11-25 12:53:24 -03:00
parent 887d42ca4f
commit a5ea07f4ae
No known key found for this signature in database
GPG Key ID: 1F2E76ACE3F531C8
1 changed files with 1 additions and 10 deletions

View File

@ -19,15 +19,6 @@
thinkfan-shepherd-service
thinkfan-service-type))
(define ((list-of predicate) x)
(null? (filter (negate predicate) x)))
(define list-of-symbols?
(list-of symbol?))
(define list-of-strings?
(list-of string?))
(define-configuration/no-serialization thinkfan-configuration
(pid-file
(string "/var/run/thinkfan.pid")
@ -50,7 +41,7 @@ arbitrary command-line arguments to thinkfan as a list of strings."))
(provision '(thinkfan))
(documentation
"Adjust fan level according to configured temperature limits.")
(requirement '(user-processes kernel-module-loader))
(requirement '(user-processes))
(start #~(make-forkexec-constructor
(list (string-append #$thinkfan-next
"/sbin/thinkfan")