Changes to ~/.Xresources, erc, rainbow-mode, etc

9 files changed, 36 insertions, 14 deletions

diff --git a/.config/emacs/modules/bd--devel.el b/.config/emacs/modules/bd--devel.el
index a3f0faf..a49e311 100644
--- a/.config/emacs/modules/bd--devel.el
+++ b/.config/emacs/modules/bd--devel.el
@@ -45,6 +45,9 @@ to.")
 (indent-tabs-mode 0)
 
 
+(use-package rainbow-mode)
+
+
 (use-package magit
   :commands magit-status
   :custom
diff --git a/.config/emacs/modules/bd--erc.el b/.config/emacs/modules/bd--erc.el
index 6098868..9370e36 100644
--- a/.config/emacs/modules/bd--erc.el
+++ b/.config/emacs/modules/bd--erc.el
@@ -3,16 +3,16 @@
 
 (with-eval-after-load "erc" (defalias 'erc 'erc-tls))
 (setopt erc-lurker-threshold-time 3600
-        erc-hide-list '("PART" "QUIT")
+        erc-hide-list '("JOIN" "PART" "QUIT")
         erc-server "operationnull.com"
         erc-nick "Isaz"
         erc-prompt-for-password t
         erc-kill-buffer-on-part t
         erc-autojoin-channels-alist '(("libera.chat"
-                                       "#parabola"
                                        "#emacs"
                                        "##furry"
-                                       "#guix"))
+                                       "#guix"
+                                       "#parabola"))
         erc-fill-function 'erc-fill-static
         erc-fill-column 80
         erc-fill-static-center 15)
diff --git a/.config/emacs/modules/bd--org.el b/.config/emacs/modules/bd--org.el
index 93ed825..06791a2 100644
--- a/.config/emacs/modules/bd--org.el
+++ b/.config/emacs/modules/bd--org.el
@@ -16,17 +16,17 @@ each org file open."
   (org-toggle-inline-images)
   (org-toggle-pretty-entities))
 
-;; hooks
+;;;; hooks
 (add-hook 'org-mode-hook 'bd/org-mode-setup-hook)
 
-;; binds
+;;;; binds
 (keymap-global-set "C-c n a" 'org-agenda)
 (keymap-global-set "C-c n c" 'org-capture)
 (keymap-global-set "C-c n s" 'org-schedule)
 (keymap-global-set "C-c n d" 'org-deadline)
 (keymap-global-set "C-c n r" 'org-refile)
 
-;; source blocks
+;;;; source blocks
 (org-babel-do-load-languages
  'org-babel-load-languages
  '((emacs-lisp . t)
@@ -35,15 +35,15 @@ each org file open."
    (lisp . t)
    (scheme . t)))
 
-;; standard
+;;;; standard
 (setopt org-startup-folded 'show2levels
         org-ellipsis " ▾")
 
-;; export
+;;;; export
 (setopt org-export-with-toc nil
         org-export-preserve-breaks t)
 
-;; agenda
+;;;; agenda
 (advice-add 'org-refile :after 'org-save-all-org-buffers) ; after refiling tasks, save all buffers
 
 (setopt org-agenda-files
@@ -68,6 +68,8 @@ each org file open."
            "* TODO %?\n DEADLINE: %^t")
           ("cc" "Compiler Construction" entry (file+olp ,agenda-file "CS453")
            "* TODO %?\n DEADLINE: %^t")
+          ("cx" "Compiler Context" entry (file+olp ,agenda-file "CS453")
+           "* TODO %?\n %a")
           ("cw" "Creative Writing" entry (file+olp ,agenda-file "E210")
            "* TODO %?\n DEADLINE: %^t")
           ("s" " Self")
diff --git a/.config/emacs/modules/bd--popper.el b/.config/emacs/modules/bd--popper.el
index c5b6bc4..c3244b9 100644
--- a/.config/emacs/modules/bd--popper.el
+++ b/.config/emacs/modules/bd--popper.el
@@ -15,6 +15,7 @@
   (popper-reference-buffers
    '(("Output\\*$" . hide)
      ("\\*Async Shell Command\\*.*" . hide)
+     "^\\*slime-description.*\\*$"
      "^\\*shell.*\\*$" shell-mode
      "^\\*eshell.*\\*$" eshell-mode
      "^\\*term.*\\*$" term-mode
diff --git a/.config/emacs/modules/bd--rss.el b/.config/emacs/modules/bd--rss.el
index 8eafc32..dd0db2e 100644
--- a/.config/emacs/modules/bd--rss.el
+++ b/.config/emacs/modules/bd--rss.el
@@ -14,13 +14,14 @@
                               ("Mental Outlaw" "https://vid.puffyan.us/feed/channel/UC7YOGHUfC1Tb6E4pudI9STA" nil nil nil)
                               ("Luke Smith" "https://vid.puffyan.us/feed/channel/UC2eYFnH61tmytImy1mTYvhA" nil nil nil)
                               ("Bugswriter" "https://yewtu.be/feed/channel/UCngn7SVujlvskHRvRKc1cTw" nil nil nil)
+                              ("SystemCrafters" "https://yewtu.be/feed/channel/UCAiiOTio8Yu69c3XnR7nQBQ" nil nil nil)
                               ("Protesilaos Stravrou" "https://vid.puffyan.us/feed/channel/UC0uTPqBCFIpZxlz_Lv1tk_g" nil nil nil))
         ;; may require ./newsticker/groups to be cleared
         newsticker-groups '("Feeds"
                             ("READING" "James Enge Mastodon" "Tales From the Magician's Skull" "Ambrose and Elsewhere")
                             ("PHILOSOPHY" "Protesilaos Issues")
                             ("TECH" "Parabola GNU/Linux-libre" "suckless.org news")
-                            ("VIDEO" "Mental Outlaw" "Luke Smith" "Bugswriter" "Protesilaos Stravrou")))
+                            ("VIDEO" "Mental Outlaw" "Luke Smith" "Bugswriter" "Protesilaos Stravrou" "SystemCrafters")))
 
 
 (provide 'bd--rss)
diff --git a/.config/guix/emacs-manifest.scm b/.config/guix/emacs-manifest.scm
index f762ae5..9bb92d3 100644
--- a/.config/guix/emacs-manifest.scm
+++ b/.config/guix/emacs-manifest.scm
@@ -19,6 +19,7 @@
    "emacs-orderless"
    "emacs-org-roam"
    "emacs-popper"
+   "emacs-rainbow-mode"
    "emacs-simple-httpd"
    "emacs-slime"
    "emacs-vertico"
diff --git a/.config/guix/modules/base.scm b/.config/guix/modules/base.scm
index 1c18fad..46ebde0 100644
--- a/.config/guix/modules/base.scm
+++ b/.config/guix/modules/base.scm
@@ -40,7 +40,7 @@
         "ffmpeg"
         "gimp"
         "gnupg"
-        "htop"
+        "graphviz"
         "icecat"
         "jq"
         "libreoffice"
diff --git a/.config/guix/modules/xdg.scm b/.config/guix/modules/xdg.scm
index 76106e9..3c122f6 100644
--- a/.config/guix/modules/xdg.scm
+++ b/.config/guix/modules/xdg.scm
@@ -1,5 +1,8 @@
 (define-module (xdg)
+  #:use-module (guix gexp)
+  #:use-module (gnu services)
   #:use-module (gnu home services)
+  #:use-module (xdg)
   #:use-module (gnu home services xdg))
 
 
@@ -14,4 +17,9 @@
              (pictures "$HOME/media")
              (publicshare "$HOME")
              (templates "$HOME")
-             (videos "$HOME/media")))))
+             (videos "$HOME/media")))
+   (simple-service 'dotfiles
+                   home-files-service-type
+                   `((".Xresources"
+                      ,(plain-file "Xresources" "Sxiv.background: #000000
+Sxiv.foreground: #00C0FF"))))))
diff --git a/.config/guix/modules/ymir.scm b/.config/guix/modules/ymir.scm
index 556ea29..51a1c36 100644
--- a/.config/guix/modules/ymir.scm
+++ b/.config/guix/modules/ymir.scm
@@ -51,11 +51,12 @@
                         "imagemagick"
                         "mpd"
                         "mpd-mpc"
-                        "nss-certs"
+                        ;; "nss-certs" ;; was moved to base-packages
                         "picom"
                         "pulseaudio"
                         "vim"
-                        "xmodmap"))
+                        "xmodmap"
+                        "xrdb"))
                ,@%base-packages
                ,dwm-packages))
 
@@ -74,6 +75,11 @@
                        (music-directory "~/Personal/mpd/music")
                        (playlist-directory "~/Personal/mpd/playlist")
                        (default-port 6600)))
+             ;; (service elogind-service-type
+             ;;          (elogind-configuration
+             ;;           (handle-power-key 'hibernate)
+             ;;           (idle-action-seconds (* 5 60))
+             ;;           (idle-action 'suspend)))
              (set-xorg-configuration
               (xorg-configuration (keyboard-layout keyboard-layout))))