From a5ea07f4ae08b37131cf005dac1fb8147c130915 Mon Sep 17 00:00:00 2001 From: Luis Guilherme Coelho Date: Sat, 25 Nov 2023 12:53:24 -0300 Subject: [PATCH] services: linux: Remove redundant definitions --- modules/radix/services/linux.scm | 11 +---------- 1 file changed, 1 insertion(+), 10 deletions(-) diff --git a/modules/radix/services/linux.scm b/modules/radix/services/linux.scm index f9460da..7f1f582 100644 --- a/modules/radix/services/linux.scm +++ b/modules/radix/services/linux.scm @@ -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")