summaryrefslogtreecommitdiff
path: root/tw
diff options
context:
space:
mode:
authorTimo Wilken2023-07-02 11:40:48 +0200
committerTimo Wilken2023-07-02 11:40:48 +0200
commit5912e1a45d5cdd42632c441dc742588f2c3462c3 (patch)
tree1aaa9029dc673394afe91df5bed5403c8b4b95e3 /tw
parentbdb21b510e38dbd7b80aa032a7a1fde73fdb3dc4 (diff)
Set backlight on laptop startup
Diffstat (limited to 'tw')
-rw-r--r--tw/system/lap.scm11
1 files changed, 10 insertions, 1 deletions
diff --git a/tw/system/lap.scm b/tw/system/lap.scm
index 0b615b9b..f17777ee 100644
--- a/tw/system/lap.scm
+++ b/tw/system/lap.scm
@@ -25,7 +25,7 @@
kerberos linux mtools pulseaudio search shells tls wm xorg)
(use-service-modules admin authentication avahi base cups dbus desktop docker
- kerberos linux mcron networking pm syncthing vpn xorg)
+ kerberos linux mcron networking pm shepherd syncthing vpn xorg)
(define efi-system-partition ; /dev/nvme0n1p1
(uuid "E04A-DF05" 'fat))
@@ -368,6 +368,15 @@ support extra features (acr, pmu, gr).")
(extra-special-file "/etc/NetworkManager/dispatcher.d/09-set-timezone"
(program-file "set-timezone" set-timezone-script))
+ (simple-service 'xbacklight-services shepherd-root-service-type
+ (list
+ (shepherd-service
+ (documentation "Set laptop screen backlight on boot.")
+ (provision '(backlight))
+ (one-shot? #t)
+ (start #~(make-forkexec-constructor
+ (list #$(file-append xbacklight "/bin/xbacklight") "-set" "100"))))))
+
(extra-special-file "/etc/guix/machines.scm"
(scheme-file "machines.scm"
#~(let ((lud (build-machine