git/.config/git/config

@@ -2,6 +2,6 @@
     name = Tom Willemse
     email = tom@ryuslash.org
 [diff "org"]
-      xfuncname = "^\\*+ +(.+)"
+      xfuncname = "^\\*+ *(.*)"
 [diff "lisp"]
       xfuncname = "^[[:space:]]*?\\(def\\w+? ((\\w|-|'|:|=|<|>)+)"

oni/home/config/common.scm

@@ -125,7 +125,7 @@
   (service home-openssh-service-type
            (home-openssh-configuration
             (hosts (list (openssh-host
-                          (name "ryuslash.org")
+                          (name "ryuslash")
                           (host-name "ryuslash.org")
                           (user "slash")
                           (port 4511)

oni/home/config/rincewind.scm

@@ -3,25 +3,16 @@
                 #:select (home-channels-service-type))
   #:use-module ((gnu home)
                 #:select (home-environment))
-  #:use-module ((gnu packages certs)
-                #:select (nss-certs))
   #:use-module ((gnu packages emacs)
                 #:select (emacs-next))
   #:use-module ((gnu packages emacs-xyz)
-                #:select (emacs-org-roam
-                          emacs-vterm
-                          emacs-guix))
+                #:select (emacs-litable
+                          emacs-org-roam
+                          emacs-vterm))
   #:use-module ((gnu packages file-systems)
                 #:select (tmsu))
-  #:use-module ((gnu packages forth)
-                #:select (gforth))
-  #:use-module ((gnu packages gnome)
-                #:select (hicolor-icon-theme))
   #:use-module ((gnu packages linux)
                 #:select (fakeroot))
-  #:use-module ((gnu packages mail)
-                #:select (notmuch
-                          emacs-notmuch))
   #:use-module ((gnu packages music)
                 #:select (easytag))
   #:use-module ((gnu packages video)
@@ -126,6 +117,7 @@
              '("name = 'mowedline'"
                "class_g = 'trayer'"
                "bounding_shaped"
+               "class_g = 'xfreerdp'"
                "class_g = 'i3lock'"))
             (wintypes
              '((dnd (shadow . #f))
@@ -135,9 +127,6 @@
             (active-opacity 95)
             (frame-opacity 100)
             (inactive-opacity-override #t)
-            (opacity-rule
-             '("100:name *?= '(Meeting) | Microsoft Teams'"
-               "100:name *?= 'freerdp'"))
             (blur-background #t)
             (blur-background-frame #t)
             (blur
@@ -146,13 +135,16 @@
             (blur-background-fixed #t)
             (blur-background-exclude
              '("name *= 'rofi'"
+               "class_g = 'xfreerdp'"
                "class_g = 'i3lock'"))
             (focus-exclude
              '("name *= 'rofi'"
+               "class_g = 'xfreerdp'"
                "class_g = 'i3lock'"))
             (fading #t)
             (fade-exclude
-             `("class_g = 'i3lock'"))
+             `("class_g = 'xfreerdp'"
+               "class_g = 'i3lock'"))
             (fade-in-step 3)
             (fade-out-step 3))))
 
@@ -173,18 +165,10 @@
                  fakeroot               ; Needed for build arch packages
                  tmsu
                  mpd-random-albums
-                 notmuch
-                 emacs-notmuch
                  emacs-inkplate
                  emacs-outli
-                 emacs-guix
                  emacs-oni-org-roam
-                 emacs-oni-vterm
-                 gforth
-                 ;; Might be needed for certain icons?
-                 hicolor-icon-theme
-                 ;; Might be needed for cetrificates
-                 nss-certs))
+                 emacs-oni-vterm))
 
  (services
   (list

oni/home/services/picom.scm

@@ -143,9 +143,6 @@
   (blur-background-exclude
    (list '())
    "Exclude conditions for background blur")
-  (opacity-rule
-   (list '())
-   "Specify a list of opacity rules, in the format PERCENT:PATTERN, like 50:name *= \"Firefox\".")
   (focus-exclude
    (list '())
    "Specify a list of conditions of windows that should always be considered focused")

oni/home/services/stumpwm/config

@@ -53,13 +53,4 @@ after it has been unlocked."
 (mode-line)
 
 (restore-from-file "default")
-
-(define-frame-preference "Default"
-  (0 t nil :class "kitty")
-  (1 t nil :class "Emacs")
-  (3 t nil :class "firefox"))
-
-(define-frame-preference "teams"
-  (0 t t :class "teams-for-linux" :create t))
-
 (swank:create-server :dont-close t)