Changeset 30cc41f in dotfiles

Timestamp:

Apr 21, 2023, 11:14:57 PM (21 months ago)

Author:

Mikhail Kirillov <mikhail.kirillov@…>

Branches:

master

Children:

3e76cbf

Parents:

f73cc02

Message:

Add brightness control to sway

File:

• guix/rde/src/wkz-p1.scm (modified) (5 diffs)

guix/rde/src/wkz-p1.scm

@@ -1 @@
-(define-module (abcdw minimal)
+(define-module (wkz-p1)
   #:use-module (rde features)
   #:use-module (rde features base)
-  #:use-module (abcdw feature-lists)
   #:use-module (rde features documentation)
   #:use-module (rde features linux)
@@ -36 +35 @@
    (append
     (strings->packages
-     ;; "figlet" ;; TODO: Move to emacs-artist-mode
      ;; "calibre"
      "glibc-locales"
-     "icecat" "nyxt"
-     "ungoogled-chromium-wayland" "ublock-origin-chromium"
-
-     ;; "utox" "qtox" "jami"
+     "icecat" ;; "nyxt"
+     ;; "ungoogled-chromium-wayland" "ublock-origin-chromium"
 
      "alsa-utils" "yt-dlp" "cozy"
@@ -49 +45 @@
      "obs" "obs-wlrobs"
      "recutils" "binutils" "make"
-     ;; "fheroes2"
-
-     "hicolor-icon-theme" ;; "adwaita-icon-theme" "gnome-themes-extra"
+
      "papirus-icon-theme" "arc-theme"
      "thunar" "fd"
      "glib:bin"
-
-     ;; "libreoffice"
-     "ffmpeg"
-     "ripgrep"))))
+     "wob" "brightnessctl"
+
+     "ffmpeg"))))
 
 (define sway-extra-config-service
@@ -65 +58 @@
    home-sway-service-type
    `((output DP-2 scale 2)
-     ;; (output * bg ,wallpaper-ai-art center)
-     ;; (output eDP-1 disable)
      ,@(map (lambda (x) `(workspace ,x output DP-2)) (iota 8 1))
 
-     ;; (workspace 9 output DP-2)
-     ;; (workspace 10 output DP-2)
-
-     ;; (bindswitch --reload --locked lid:on exec /run/setuid-programs/swaylock)
+     (bindswitch --reload --locked lid:on exec /run/setuid-programs/swaylock)
+
+     (bindsym --locked XF86MonBrightnessUp exec
+              ,(file-append (@ (gnu packages linux) brightnessctl) "/bin/brightnessctl")
+              set 5%+)
+     (bindsym --locked XF86MonBrightnessDown exec
+              ,(file-append (@ (gnu packages linux) brightnessctl) "/bin/brightnessctl")
+              set 5%-)
 
      (bindsym
@@ -116 +111 @@
      (feature-desktop-services)
      (feature-hidpi)
-     ;; (feature-foreign-distro)
+     (feature-foreign-distro)
      
      (feature-sway)