Reformat files using ‘guix-pretty-print-buffer’

1 files changed, 32 insertions, 31 deletions

diff --git a/oni/home/config/pop-os.scm b/oni/home/config/pop-os.scm
index 9f9201b..b8b6c21 100644
--- a/oni/home/config/pop-os.scm
+++ b/oni/home/config/pop-os.scm
@@ -37,17 +37,6 @@
                 #:select (home-mbsync-service-type))
   #:use-module (oni home services polybar)
   #:use-module (oni home services rofi)
-  ;; #:use-module ((oni home services stumpwm)
-  ;;               #:select (home-stumpwm-service-type
-  ;;                         home-stumpwm-configuration
-  ;;                         home-stumpwm-gaps-service-type
-  ;;                         home-stumpwm-gaps-configuration
-  ;;                         home-stumpwm-stumptray-service-type
-  ;;                         home-stumpwm-stumptray-configuration
-  ;;                         home-stumpwm-playerctl-service-type
-  ;;                         home-stumpwm-playerctl-configuration
-  ;;                         home-stumpwm-pamixer-service-type
-  ;;                         home-stumpwm-pamixer-configuration))
   #:use-module (oni home services xdisorg)
   #:use-module (oni packages emacs)
   #:use-module ((oni packages emacs-config)
@@ -85,8 +74,6 @@
                 #:select (font-comfortaa
                           font-annotation-mono))
   #:use-module (oni packages hlwm-run-or-raise)
-  ;; #:use-module ((oni packages stumpwm)
-  ;;               #:select (stumpwm+swank))
   #:use-module (oni packages shutdown-rofi))
 
 (define-record-type* <home-module> home-module
@@ -139,24 +126,32 @@
                            ((theme floating reset) . 1)))
                         (rules
                          '(("focus=on")
-                           ("class=Emacs" "tag=dev" "index=01" "switchtag=on" "hook=emacs")
-                           ("class~'URxvt|kitty'" "tag=dev" "index=1" "switchtag=on" "hook=urxvt")
-                           ("class~'Conkeror|[Ff]irefox|Chromium'" "tag=web" "index=0" "switchtag=on")
+                           ("class=Emacs" "tag=dev" "index=01" "switchtag=on"
+                            "hook=emacs")
+                           ("class~'URxvt|kitty'" "tag=dev" "index=1"
+                            "switchtag=on" "hook=urxvt")
+                           ("class~'Conkeror|[Ff]irefox|Chromium'" "tag=web"
+                            "index=0" "switchtag=on")
                            ("class=Pinentry" "pseudotile=on")
                            ("class=Alsaplayer" "pseudotile=on")
                            ("class=Gcr-prompter" "pseudotile=on")
                            ("class=Steam" "title='Steam Login'" "pseudotile=on")
-                           ("class=Steam" "title~'Steam - News .*'" "pseudotile=on")
+                           ("class=Steam" "title~'Steam - News .*'"
+                            "pseudotile=on")
                            ("class=" "title=Steam" "pseudotile=on")
-                           ("class=xfreerdp" "floating=on" "tag=work" "index=0" "switchtag=on")
-                           ("windowtype~'_NET_WM_WINDOW_TYPE_(DIALOG|UTILITY|SPLASH)'" "pseudotile=on")
+                           ("class=xfreerdp" "floating=on" "tag=work" "index=0"
+                            "switchtag=on")
+                           ("windowtype~'_NET_WM_WINDOW_TYPE_(DIALOG|UTILITY|SPLASH)'"
+                            "pseudotile=on")
                            ("windowtype='_NET_WM_WINDOW_TYPE_DIALOG'" "focus=on")
-                           ("windowtype~'_NET_WM_WINDOW_TYPE_(NOTIFICATION|DOCK|DESKTOP)'" "manage=off")
+                           ("windowtype~'_NET_WM_WINDOW_TYPE_(NOTIFICATION|DOCK|DESKTOP)'"
+                            "manage=off")
                            ("class=pinball.exe" "pseudotile=on")))
                         (padding '(0 0 0 16 16))
                         (layouts
                          '((web clients max:0)
-                           (dev split horizontal:0.7375:1 (clients max:0) (clients vertical:0))))
+                           (dev split horizontal:0.7375:1 (clients max:0)
+                                (clients vertical:0))))
                         (extra
                          (list
                           (mixed-text-file
@@ -175,19 +170,25 @@
                                (mixed-text-file
                                 "sxhkdrc-playerctl"
                                 "XF86AudioPlay\n"
-                                "    herbstclient spawn " playerctl "/bin/playerctl play-pause\n"
+                                "    herbstclient spawn " playerctl
+                                "/bin/playerctl play-pause\n"
                                 "XF86AudioNext\n"
-                                "    herbstclient spawn " playerctl "/bin/playerctl next\n"
+                                "    herbstclient spawn " playerctl
+                                "/bin/playerctl next\n"
                                 "XF86AudioPrev\n"
-                                "    herbstclient spawn " playerctl "/bin/playerctl prev\n")
+                                "    herbstclient spawn " playerctl
+                                "/bin/playerctl prev\n")
                                (mixed-text-file
                                 "sxhkdrc-pamixer"
                                 "XF86AudioRaiseVolume\n"
-                                "    herbstclient spawn " pamixer "/bin/pamixer --increase 10\n"
+                                "    herbstclient spawn " pamixer
+                                "/bin/pamixer --increase 10\n"
                                 "XF86AudioLowerVolume\n"
-                                "    herbstclient spawn " pamixer "/bin/pamixer --decrease 10\n"
+                                "    herbstclient spawn " pamixer
+                                "/bin/pamixer --decrease 10\n"
                                 "XF86AudioMute\n"
-                                "    herbstclient spawn " pamixer "/bin/pamixer --toggle-mute\n")))))
+                                "    herbstclient spawn " pamixer
+                                "/bin/pamixer --toggle-mute\n")))))
 
               (service home-polybar-service-type
                        (home-polybar-configuration
@@ -195,10 +196,10 @@
 
 (define* (home-modules->home-environment #:rest modules)
   (home-environment
-    (packages
-     (apply append (map home-module-packages modules)))
-    (services
-     (apply append (map home-module-services modules)))))
+   (packages
+    (apply append (map home-module-packages modules)))
+   (services
+    (apply append (map home-module-services modules)))))
 
 (home-modules->home-environment
  oni-home-herbstluftwm-configuration