summaryrefslogtreecommitdiff
path: root/gnu/services/pm.scm
diff options
context:
space:
mode:
authorMaxim Cournoyer <maxim.cournoyer@gmail.com>2022-03-21 23:39:43 -0400
committerMaxim Cournoyer <maxim.cournoyer@gmail.com>2022-03-21 23:39:43 -0400
commita9429c8f2207841c649438187d6e19046d323a16 (patch)
treea06e4b8a87b6a42742cf6750276746a10b6c2139 /gnu/services/pm.scm
parentf0136b36ae8c1e9c174043bd50e0e24413c0f345 (diff)
parent49b350fafc2c3ea1db66461b73d4e304cd13ec92 (diff)
Merge branch 'staging' into core-updates.
Diffstat (limited to 'gnu/services/pm.scm')
-rw-r--r--gnu/services/pm.scm21
1 files changed, 21 insertions, 0 deletions
diff --git a/gnu/services/pm.scm b/gnu/services/pm.scm
index d91f2b69ce..e48236dbca 100644
--- a/gnu/services/pm.scm
+++ b/gnu/services/pm.scm
@@ -253,6 +253,22 @@ default, performance, powersave.")
(string "powersave")
"Same as @code{pcie-aspm-ac} but on BAT mode.")
+ (start-charge-thresh-bat0
+ (maybe-non-negative-integer 'disabled)
+ "Percentage when battery 0 should begin charging.")
+
+ (stop-charge-thresh-bat0
+ (maybe-non-negative-integer 'disabled)
+ "Percentage when battery 0 should stop charging.")
+
+ (start-charge-thresh-bat1
+ (maybe-non-negative-integer 'disabled)
+ "Percentage when battery 1 should begin charging.")
+
+ (stop-charge-thresh-bat1
+ (maybe-non-negative-integer 'disabled)
+ "Percentage when battery 1 should stop charging.")
+
(radeon-power-profile-on-ac
(string "high")
"Radeon graphics clock speed level. Alternatives are
@@ -419,6 +435,8 @@ shutdown on system startup."))
(define-record-type* <thermald-configuration>
thermald-configuration make-thermald-configuration
thermald-configuration?
+ (adaptive? thermald-adaptive? ;boolean
+ (default #f))
(ignore-cpuid-check? thermald-ignore-cpuid-check? ;boolean
(default #f))
(thermald thermald-thermald ;file-like
@@ -432,6 +450,9 @@ shutdown on system startup."))
(start #~(make-forkexec-constructor
'(#$(file-append (thermald-thermald config) "/sbin/thermald")
"--no-daemon"
+ #$@(if (thermald-adaptive? config)
+ '("--adaptive")
+ '())
#$@(if (thermald-ignore-cpuid-check? config)
'("--ignore-cpuid-check")
'()))))