Remove web browser, other outdated config

4 files changed, 20 insertions, 25 deletions

diff --git a/.config/emacs/modules/bd--browse.el b/.config/emacs/modules/bd--browse.el
index 77a5d93..cd255cc 100644
--- a/.config/emacs/modules/bd--browse.el
+++ b/.config/emacs/modules/bd--browse.el
@@ -13,8 +13,8 @@ icecat, or eww."
   (interactive)
   (pcase pref
     (0 (eww url))
-    (1 (start-process "icecat" nil "icecat" "--new-window" url))
-    (2 (start-process "torbrowser" nil "torbrowser" "--new-window" url))
+    (1 (start-process "torbrowser" nil "torbrowser" "--new-window" url))
+    (2 (start-process "icecat" nil "icecat" "--new-window" url))
     (_ (start-process "librewolf" nil "librewolf" "--new-window" url))))
 (setopt browse-url-browser-function 'bd/browse)
 
@@ -41,8 +41,8 @@ icecat, or eww."
    (list (bd/search-candidate "DuckDuckGo" "https://www.duckduckgo.com/?q=" 3)
          (bd/search-candidate "Wikipedia" "https://en.wikipedia.org/w/index.php?search=" 3)
          (bd/search-candidate "Invidious" "https://yewtu.be/search?q=" 0)
-         (bd/search-candidate "Urban Dictionary" "https://www.urbandictionary.com/define.php?term=" 1)
-         (bd/search-candidate "Archwiki" "https://wiki.archlinux.org/index.php?title=Special%3ASearch&search=" 1)
+         (bd/search-candidate "Urban Dictionary" "https://www.urbandictionary.com/define.php?term=" 2)
+         (bd/search-candidate "Archwiki" "https://wiki.archlinux.org/index.php?title=Special%3ASearch&search=" 2)
          (bd/search-candidate "Web" "" 3))))
 
 (defun bd/visit-bookmark ()
@@ -75,18 +75,6 @@ icecat, or eww."
   (shr-cookie-policy nil)
   (shr-max-width 85))
 
-(use-package eww
-  :hook
-  ((eww-after-render . (lambda ()
-                         (setq-local fill-column-desired-width 90)
-                         (fill-column-mode))))
-  :custom
-  (eww-search-prefix "https://duckduckgo.com/html/?q=")
-  (eww-auto-rename-buffer 'title)
-  (eww-use-browse-url (regexp-opt '("mailto:"
-                                    "youtube.com"
-                                    "youtu.be"))))
-
 (use-package elpher
   :bind
   (:map elpher-mode-map
@@ -111,6 +99,19 @@ icecat, or eww."
   (elpher-gemini-max-fill-width 85)
   (elpher-use-emacs-bookmark-menu t))
 
+(use-package eww
+  :hook
+  ((eww-after-render . (lambda ()
+                         (setq-local fill-column-desired-width 90)
+                         (fill-column-mode))))
+  :custom
+  (eww-search-prefix "https://duckduckgo.com/html/?q=")
+  (eww-auto-rename-buffer 'title)
+  (eww-use-browse-url (regexp-opt '("mailto:"
+                                    "youtube.com"
+                                    "youtu.be"))))
+
+
 (use-package apropos
   :bind (("C-h a" . selector-apropos)))
 
diff --git a/.config/emacs/modules/bd--org.el b/.config/emacs/modules/bd--org.el
index 82d0703..c761e19 100644
--- a/.config/emacs/modules/bd--org.el
+++ b/.config/emacs/modules/bd--org.el
@@ -103,9 +103,7 @@
   (defvar-local agenda-file "~/dc/agenda/agenda_tasks.org")
 
   (defvar-local bd/course-list
-      '(("520" . ?2)
-	("575" . ?7)
-	("610" . ?1))
+      '()
     "Courses for tagging, capturing, and various
 agenda views.")
 
diff --git a/.config/emacs/modules/bd--themes.el b/.config/emacs/modules/bd--themes.el
index d6f716f..443352c 100644
--- a/.config/emacs/modules/bd--themes.el
+++ b/.config/emacs/modules/bd--themes.el
@@ -20,13 +20,13 @@ to.")
 
 (set-face-attribute 'variable-pitch nil
                     :family "Dejavu Math TeX Gyre"
-                    :height 120)
+                    :height 130)
 (set-face-attribute 'fixed-pitch nil
                     :family "DejaVu Sans Mono"
                     :height 120)
 (set-face-attribute 'default nil
                     :family "DejaVu Sans Mono"
-                    :height 140)
+                    :height 130)
 
 
 (use-package modus-themes
@@ -42,8 +42,6 @@ and some other minor face changes."
       (custom-set-faces
        `(mode-line ((,c :overline ,bg-button-active)))
        `(mode-line-inactive ((,c :overline ,bg-button-inactive)))
-       `(hl-line ((,c :background nil :underline ,fg-main)))
-       `(line-number-current-line ((,c :underline ,fg-main)))
        `(eshell-prompt ((,c :foreground ,fg-main :background ,bg-dim :height 1.1 :extend t))))))
   (add-hook 'modus-themes-post-load-hook #'bd/modus-set-faces)
   :custom
diff --git a/.config/guix/modules/base.scm b/.config/guix/modules/base.scm
index edad2a1..dfbdf69 100644
--- a/.config/guix/modules/base.scm
+++ b/.config/guix/modules/base.scm
@@ -47,7 +47,6 @@
  image ;; flameshot
  imagemagick ;; imagemagick
  image-viewers ;; nsxiv
- librewolf ;; librewolf
  linux ;; sysstat
  mail ;; offlineimap
  man ;; man-pages
@@ -116,7 +115,6 @@
    graphviz
    icecat
    imagemagick
-   librewolf
    mgba
    mpv
    mupen64plus-audio-sdl