]> git.armaanb.net Git - config.org.git/blobdiff - config.org
xmodmap: fix tangle
[config.org.git] / config.org
index f05194d04d8624068b86335f2df7aba6963521ee..fa43e92b8bf22bcdc113dd26727e5b8f9853405f 100644 (file)
@@ -6,22 +6,20 @@
 * Welcome
 Welcome to my system configuration! This file contains my Emacs configuration, but also my config files for many of the other programs on my system!
 ** Compatability
-I am currently using GCCEmacs 28 from the feature/native-comp branch, so some settings may not be available for older versions of Emacs. This is a purely personal configuration, so while I can garuntee that it works on my setup, I can't for anything else.
+I am currently using Emacs 27.2 on Linux, so some settings and packages may not be available for older versions of Emacs. This is a purely personal configuration, so while I can guarantee that it works on my setup, it might not work for you.
 ** Choices
-I chose to create a powerful, yet not overly heavy Emacs configuration. Things like LSP mode are important to my workflow and help me be productive, so despite its weight, it is kept. Things like a fancy modeline or icons on the other hand, do not increase my productivity, and create visual clutter, and thus have been excluded.
+I chose to create a powerful, yet not overly heavy Emacs configuration. Things like a fancy modeline, icons, or LSP mode do not increase my productivity, and create visual clutter, and thus have been excluded.
 
-Another important choice has been to integrate Emacs into a large part of my computing environment (see [[*EmacsOS]]). I use Email, IRC, et cetera, all through Emacs which simplifies my workflow.
+Another important choice has been to integrate Emacs into a large part of my computing environment (see [[*Emacs OS]]). I use email, IRC, RSS, et cetera, all through Emacs which simplifies my workflow and creates an amazingly integrated environment.
 
-Lastly, I use Evil mode. I think modal keybindings are simple and more ergonomic than standard Emacs style, and Vim keybindings are what I'm comfortable with and are pervasive throughout computing.
-** TODOs
-*** TODO Turn keybinding and hook declarations into use-package declarations where possible
-*** TODO Include offlineimap config
+Lastly, I use Evil mode. Modal keybindings are simpler and more ergonomic than standard Emacs style, and Vim keybindings are what I'm comfortable with and are pervasive throughout computing.
 ** License
-Released under the [[https://opensource.org/licenses/MIT][MIT license]] by Armaan Bhojwani, 2021. Note that many snippets are taken from online, and other sources, who are credited for their work at the snippet.
+Released under the [[https://opensource.org/licenses/MIT][MIT license]] by Armaan Bhojwani, 2021. Note that many snippets are taken from online, and other sources, who are credited for their work near their contributions.
 * Package management
 ** Bootstrap straight.el
 straight.el is really nice for managing package, and it integrates nicely with use-package. It uses the bootstrapping system defined here for installation.
 #+begin_src emacs-lisp
+  (defvar native-comp-deferred-compilation-deny-list ())
   (defvar bootstrap-version)
   (let ((bootstrap-file
          (expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory))
@@ -35,29 +33,29 @@ straight.el is really nice for managing package, and it integrates nicely with u
         (eval-print-last-sexp)))
     (load bootstrap-file nil 'nomessage))
 #+end_src
-** Replace use-package with straight
+** Replace package.el with straight
 #+begin_src emacs-lisp
   (straight-use-package 'use-package)
   (setq straight-use-package-by-default t)
 #+end_src
 * Visual options
 ** Theme
-Very nice high contrast theme.
-
-Its fine to set this here because I run Emacs in daemon mode, but if I were not, then putting it in early-init.el would be a better choice to eliminate the window being white before the theme is loaded.
+Use the Modus Operandi theme by Protesilaos Stavrou. Its the best theme for Emacs by far, because how clear and readable it is. It is highly customizable, but I just set a few options here.
 #+begin_src emacs-lisp
-  (setq modus-themes-slanted-constructs t
-        modus-themes-bold-constructs t
-        modus-themes-mode-line '3d
-        modus-themes-scale-headings t
-        modus-themes-diffs 'desaturated)
-  (load-theme 'modus-vivendi t)
+  (use-package modus-themes
+    :custom
+    (modus-themes-slanted-constructs t)
+    (modus-themes-bold-constructs t)
+    (modus-themes-mode-line '3d)
+    (modus-themes-scale-headings t)
+    (modus-themes-diffs 'desaturated)
+    :config (load-theme 'modus-vivendi t))
 #+end_src
 ** Typography
 *** Font
-Great programming font with ligatures.
+JetBrains Mono is a great programming font with ligatures. The "NF" means that it has been patched with the [[https://www.nerdfonts.com/][Nerd Fonts]].
 #+begin_src emacs-lisp
-  (add-to-list 'default-frame-alist '(font . "JetBrainsMonoNF-12"))
+  (add-to-list 'default-frame-alist '(font . "JetBrainsMonoNF-11"))
 #+end_src
 *** Ligatures
 #+begin_src emacs-lisp
@@ -78,10 +76,11 @@ Great programming font with ligatures.
        "[||]" "[<" "[|" "{|" "?." "?=" "?:" "##" "###" "####" "#["
        "#{" "#=" "#!" "#:" "#_(" "#_" "#?" "#(" ";;" "_|_" "__" "~~"
        "~~>" "~>" "~-" "~@" "$>" "^=" "]#"))
-    (global-ligature-mode t))
+    ;; (global-ligature-mode t))
+    )
 #+end_src
 ** Line numbers
-Display relative line numbers except in some modes
+Display relative line numbers except in certain modes.
 #+begin_src emacs-lisp
   (global-display-line-numbers-mode)
   (setq display-line-numbers-type 'relative)
@@ -89,6 +88,7 @@ Display relative line numbers except in some modes
                          pdf-view-mode-hook
                          shell-mode-hook
                          org-mode-hook
+                         circe-mode-hook
                          eshell-mode-hook))
     (add-hook no-line-num (lambda () (display-line-numbers-mode 0))))
 #+end_src
@@ -114,61 +114,87 @@ Show current column and file size.
   (use-package minions
     :config (minions-mode))
 #+end_src
-** Ruler
-Show a ruler at a certain number of chars depending on mode.
-#+begin_src emacs-lisp
-  (setq display-fill-column-indicator-column 80)
-  (global-display-fill-column-indicator-mode)
-#+end_src
-** Keybinding hints
-Whenever starting a key chord, show possible future steps.
+** Whitespace mode
+Highlight whitespace and other bad text practices.
 #+begin_src emacs-lisp
-  (use-package which-key
-    :config (which-key-mode)
-    :custom (which-key-idle-delay 0.3))
+  (use-package whitespace
+    :custom (whitespace-style '(face lines-tail)))
+  (dolist (hook '(prog-mode-hook))
+    (add-hook hook (lambda () (whitespace-mode 1))))
 #+end_src
-** Highlight TODOs in comments
+** Highlight todo items in comments
 #+begin_src emacs-lisp
   (use-package hl-todo
     :straight (hl-todo :type git :host github :repo "tarsius/hl-todo")
     :config (global-hl-todo-mode 1))
 #+end_src
-** Don't lose cursor
+** Blink cursor
 #+begin_src emacs-lisp
   (blink-cursor-mode)
 #+end_src
 ** Visual line mode
-Soft wrap words and do operations by visual lines.
+Soft wrap words and do operations by visual lines in some modes.
 #+begin_src emacs-lisp
-  (add-hook 'text-mode-hook 'visual-line-mode 1)
+  (dolist (hook '(text-mode-hook
+                  org-mode-hook
+                  markdown-mode-hook
+                  mu4e-view-mode-hook))
+    (add-hook hook (lambda () (visual-line-mode 1))))
+#+end_src
+** Auto fill mode
+#+begin_src emacs-lisp
+  (dolist (hook '(scdoc-mode-hook
+                  mu4e-compose-mode-hook))
+    (add-hook hook (lambda () (auto-fill-mode 1))))
 #+end_src
 ** Display number of matches in search
 #+begin_src emacs-lisp
   (use-package anzu
-    :config (global-anzu-mode))
+    :after (evil)
+    :config (global-anzu-mode)
+    :bind
+    ([remap isearch-forward] . isearch-forward-regexp)
+    ([remap isearch-backward] . isearch-backward-regexp)
+    ([remap query-replace] . anzu-query-replace)
+    ([remap query-replace] . anzu-query-replace)
+    ([remap query-replace-regexp] . anzu-query-replace-regexp))
 #+end_src
+*** TODO This config doesn't work right
 ** Visual bell
-Inverts modeline instead of audible bell or the standard visual bell.
+Invert modeline color instead of audible bell or the standard visual bell.
 #+begin_src emacs-lisp
   (setq visible-bell nil
         ring-bell-function
         (lambda () (invert-face 'mode-line)
           (run-with-timer 0.1 nil #'invert-face 'mode-line)))
 #+end_src
+** GUI
+#+begin_src emacs-lisp
+  (scroll-bar-mode -1)
+  (tool-bar-mode -1)
+  (menu-bar-mode -1)
+#+end_src
 * Evil mode
 ** General
 #+begin_src emacs-lisp
   (use-package evil
     :custom (select-enable-clipboard nil)
+    :init (setq evil-want-keybinding nil
+                evil-want-minibuffer t
+                evil-want-C-d-scroll t
+                evil-want-C-u-scroll t)
     :config
     (evil-mode)
     (fset 'evil-visual-update-x-selection 'ignore) ;; Keep clipboard and register seperate
     ;; Use visual line motions even outside of visual-line-mode buffers
     (evil-global-set-key 'motion "j" 'evil-next-visual-line)
     (evil-global-set-key 'motion "k" 'evil-previous-visual-line)
-    (global-set-key (kbd "<escape>") 'keyboard-escape-quit))
+    :bind
+    ("<escape>" . keyboard-escape-quit)
+    ("C-M-u" . universal-argument))
 #+end_src
 ** Evil collection
+Evil bindings for tons of packages.
 #+begin_src emacs-lisp
   (use-package evil-collection
     :after evil
@@ -181,17 +207,9 @@ tpope prevails!
   (use-package evil-surround
     :config (global-evil-surround-mode))
 #+end_src
-** Leader key
-#+begin_src emacs-lisp
-  (use-package evil-leader
-    :straight (evil-leader :type git :host github :repo "cofi/evil-leader")
-    :config
-    (evil-leader/set-leader "<SPC>")
-    (global-evil-leader-mode))
-#+end_src
 ** Nerd commenter
+Makes commenting super easy
 #+begin_src emacs-lisp
-  ;; Nerd commenter
   (use-package evil-nerd-commenter
     :bind (:map evil-normal-state-map
                 ("gc" . evilnc-comment-or-uncomment-lines))
@@ -200,10 +218,14 @@ tpope prevails!
 ** Undo redo
 Fix the oopsies!
 #+begin_src emacs-lisp
-  (evil-set-undo-system 'undo-redo)
+  (use-package undo-fu
+    :config (evil-set-undo-system 'undo-fu))
+
+  (use-package undo-fu-session
+    :config (global-undo-fu-session-mode))
 #+end_src
 ** Number incrementing
-Add back C-a/C-x
+Add back C-a/C-x bindings.
 #+begin_src emacs-lisp
   (use-package evil-numbers
     :straight (evil-numbers :type git :host github :repo "juliapath/evil-numbers")
@@ -212,25 +234,18 @@ Add back C-a/C-x
                 ("C-M-x" . evil-numbers/dec-at-pt)))
 #+end_src
 ** Evil org
-*** Init
 #+begin_src emacs-lisp
   (use-package evil-org
     :after org
     :hook (org-mode . evil-org-mode)
     :config
     (evil-org-set-key-theme '(textobjects insert navigation shift todo)))
+
   (use-package evil-org-agenda
     :straight (:type built-in)
     :after evil-org
     :config (evil-org-agenda-set-keys))
 #+end_src
-*** Leader maps
-#+begin_src emacs-lisp
-  (evil-leader/set-key-for-mode 'org-mode
-    "T" 'org-show-todo-tree
-    "a" 'org-agenda
-    "c" 'org-archive-subtree)
-#+end_src
 * Org mode
 ** General
 #+begin_src emacs-lisp
@@ -240,7 +255,7 @@ Add back C-a/C-x
     :custom
     (org-ellipsis " ▾")
     (org-agenda-start-with-log-mode t)
-    (org-agenda-files (quote ("~/Org/tasks.org" "~/Org/break.org")))
+    (org-agenda-files (quote ("~/org/tasks.org")))
     (org-log-done 'time)
     (org-log-into-drawer t)
     (org-src-tab-acts-natively t)
@@ -248,39 +263,37 @@ Add back C-a/C-x
     (org-startup-indented t)
     (org-hide-emphasis-markers t)
     (org-fontify-whole-block-delimiter-line nil)
-    :bind ("C-c a" . org-agenda))
+    (org-archive-default-command 'org-archive-to-archive-sibling)
+    :bind
+    ("C-c a" . org-agenda)
+    (:map evil-normal-state-map ("ga" . org-archive-subtree-default)))
 #+end_src
 ** Tempo
+Define templates for lots of common structure elements. Mostly just used within this file.
 #+begin_src emacs-lisp
   (use-package org-tempo
     :after org
     :straight (:type built-in)
     :config
-    ;; TODO: There's gotta be a more efficient way to write this
-    (add-to-list 'org-structure-template-alist '("el" . "src emacs-lisp"))
-    (add-to-list 'org-structure-template-alist '("sp" . "src conf :tangle ~/.spectrwm.conf"))
-    (add-to-list 'org-structure-template-alist '("ash" . "src shell :tangle ~/.config/ash/ashrc"))
-    (add-to-list 'org-structure-template-alist '("ipy" . "src python :tangle ~/.ipython/"))
-    (add-to-list 'org-structure-template-alist '("pi" . "src conf :tangle ~/.config/picom/picom.conf"))
-    (add-to-list 'org-structure-template-alist '("git" . "src conf :tangle ~/.gitconfig"))
-    (add-to-list 'org-structure-template-alist '("du" . "src conf :tangle ~/.config/dunst/dunstrc"))
-    (add-to-list 'org-structure-template-alist '("za" . "src conf :tangle ~/.config/zathura/zathurarc"))
-    (add-to-list 'org-structure-template-alist '("ff1" . "src css :tangle ~/.mozilla/firefox/armaan-release/chrome/userChrome.css"))
-    (add-to-list 'org-structure-template-alist '("ff2" . "src css :tangle ~/.mozilla/firefox/armaan-release/chrome/userContent.css"))
-    (add-to-list 'org-structure-template-alist '("xr" . "src conf :tangle ~/.Xresources"))
-    (add-to-list 'org-structure-template-alist '("tm" . "src conf :tangle ~/.tmux.conf"))
-    (add-to-list 'org-structure-template-alist '("gp" . "src conf :tangle ~/.gnupg/gpg.conf"))
-    (add-to-list 'org-structure-template-alist '("ag" . "src conf :tangle ~/.gnupg/gpg-agent.conf")))
+    (dolist (addition '(
+                        ("ash" . "src shell :tangle ~/.config/ash/ashrc")
+                        ("el" . "src emacs-lisp")
+                        ("git" . "src conf :tangle ~/.gitconfig")
+                        ("mb" . "src conf :tangle ~/.mbsyncrc")
+                        ("sp" . "src conf :tangle ~/.spectrwm.conf")
+                        ("tm" . "src conf :tangle ~/.tmux.conf")
+                        ("za" . "src conf :tangle ~/.config/zathura/zathurarc")
+                        ))
+      (add-to-list 'org-structure-template-alist addition)))
 #+end_src
 * Autocompletion
 ** Ivy
-Simple, but not too simple autocompletion.
+A well balanced completion framework.
 #+begin_src emacs-lisp
   (use-package ivy
-    :bind (("C-s" . swiper)
-           :map ivy-minibuffer-map
-           ("TAB" . ivy-alt-done)
-           :map ivy-switch-buffer-map
+    :bind (:map ivy-minibuffer-map
+           ("TAB" . ivy-alt-done))
+           (:map ivy-switch-buffer-map
            ("M-d" . ivy-switch-buffer-kill))
     :config (ivy-mode))
 #+end_src
@@ -294,49 +307,80 @@ Simple, but not too simple autocompletion.
 Ivy everywhere.
 #+begin_src emacs-lisp
   (use-package counsel
-    :bind (("C-M-j" . 'counsel-switch-buffer)
-           :map minibuffer-local-map
-           ("C-r" . 'counsel-minibuffer-history))
-    :custom (counsel-linux-app-format-function #'counsel-linux-app-format-function-name-only)
+    :bind ("C-M-j" . 'counsel-switch-buffer)
     :config (counsel-mode))
 #+end_src
 ** Remember frequent commands
 #+begin_src emacs-lisp
   (use-package ivy-prescient
     :after counsel
-    :custom (ivy-prescient-enable-filtering nil)
     :config
     (prescient-persist-mode)
     (ivy-prescient-mode))
 #+end_src
-** Swiper
-Better search utility.
-#+begin_src emacs-lisp
-  (use-package swiper)
-#+end_src
-* EmacsOS
+* Emacs OS
 ** RSS
-Use elfeed for RSS. I have another file with all the feeds in it.
+Use elfeed for reading RSS. I have another file with all the feeds in it that I'd rather keep private.
 #+begin_src emacs-lisp
   (use-package elfeed
     :bind (("C-c e" . elfeed))
-    :config
-    (load "~/.emacs.d/feeds.el")
-    (add-hook 'elfeed-new-entry-hook
-              (elfeed-make-tagger :feed-url "youtube\\.com"
-                                  :add '(youtube)))
+    :config (load "~/.emacs.d/feeds.el")
     :bind (:map elfeed-search-mode-map ("C-c C-o" . 'elfeed-show-visit)))
-
-  (use-package elfeed-goodies
-    :after elfeed
-    :config (elfeed-goodies/setup))
 #+end_src
 ** Email
-Use mu4e for reading emails.
-
-I use `offlineimap` to sync my maildirs. It is slower than mbsync, but is fast enough for me, especially when ran with the =-q= option.
+Use mu4e and mbsync for reading emails.
 
 Contexts are a not very well known feature of mu4e that makes it super easy to manage multiple accounts. Much better than some of the hacky methods and external packages that I've seen.
+*** mbsync
+**** General
+#+begin_src conf :tangle ~/.mbsyncrc
+  Create Near
+  Expunge Both
+  SyncState *
+#+end_src
+**** Personal
+#+begin_src conf :tangle ~/.mbsyncrc
+  IMAPStore personal-remote
+  Host imap.mailbox.org
+  User me@armaanb.net
+  PassCmd "pash show login.mailbox.org/me@armaanb.net | head -n 1"
+
+  MaildirStore personal-local
+  Path ~/mail/personal/
+  Inbox ~/mail/personal/Inbox
+  Subfolders Verbatim
+
+  Channel personal-channel
+  Far :personal-remote:
+  Near :personal-local:
+  Patterns "INBOX*" "Drafts" "Archive" "Sent" "Trash"
+
+  Group personal
+  Channel personal-channel
+#+end_src
+**** School
+#+begin_src conf :tangle ~/.mbsyncrc
+  IMAPStore school-remote
+  SSLType IMAPS
+  Host imap.gmail.com
+  User abhojwani22@nobles.edu
+  PassCmd "pash show gmail-otp/abhojwani22@nobles.edu | head -n 1"
+
+  MaildirStore school-local
+  Path ~/mail/school/
+  Inbox ~/mail/school/Inbox
+  Subfolders Verbatim
+
+  Channel school-channel
+  Far :school-remote:
+  Near :school-local:
+  Patterns * ![Gmail]*
+
+  Group school
+  Channel school-channel
+#+end_src
+*** mu4e
+**** Setup
 #+begin_src emacs-lisp
   (use-package smtpmail
     :straight (:type built-in))
@@ -350,14 +394,14 @@ Contexts are a not very well known feature of mu4e that makes it super easy to m
           smtpmail-stream-type 'ssl
           smtpmail-smtp-service '465
           mu4e-change-filenames-when-moving t
-          mu4e-get-mail-command "offlineimap -q"
+          mu4e-get-mail-command "mbsync -a"
           message-citation-line-format "On %a %d %b %Y at %R, %f wrote:\n"
           message-citation-line-function 'message-insert-formatted-citation-line
           mu4e-completing-read-function 'ivy-completing-read
           mu4e-confirm-quit nil
           mu4e-view-use-gnus t
           mail-user-agent 'mu4e-user-agent
-          mail-context-policy 'pick-first
+          mu4e-context-policy 'pick-first
           mu4e-contexts
           `( ,(make-mu4e-context
                :name "school"
@@ -392,25 +436,24 @@ Contexts are a not very well known feature of mu4e that makes it super easy to m
                        (smtpmail-smtp-server . "smtp.mailbox.org")))))
     (add-to-list 'mu4e-bookmarks
                  '(:name "Unified inbox"
-                         :query "maildir:\"/personal/INBOX\" or maildir:\"/school/INBOX\""
+                         :query "maildir:\"/personal/Inbox\" or maildir:\"/school/Inbox\""
                          :key ?b))
     :hook ((mu4e-compose-mode . flyspell-mode)
-           (mu4e-compose-mode . auto-fill-mode)
-           (mu4e-view-mode-hook . turn-on-visual-line-mode)
            (message-send-hook . (lambda () (unless (yes-or-no-p "Ya sure 'bout that?")
                                              (signal 'quit nil))))))
 #+end_src
-Discourage Gnus from displaying HTML emails
+**** Discourage Gnus from displaying HTML emails
 #+begin_src emacs-lisp
   (with-eval-after-load "mm-decode"
     (add-to-list 'mm-discouraged-alternatives "text/html")
     (add-to-list 'mm-discouraged-alternatives "text/richtext"))
 #+end_src
 ** Default browser
-Set EWW as default browser except for videos.
+Set EWW as default browser except for multimedia which should open in MPV.
 #+begin_src emacs-lisp
   (defun browse-url-mpv (url &optional new-window)
-    "Open URL in MPV."
+    "Ask MPV to load URL."
+    (interactive)
     (start-process "mpv" "*mpv*" "mpv" url))
 
   (setq browse-url-handlers
@@ -419,6 +462,9 @@ Set EWW as default browser except for videos.
           ("peertube.*" . browse-url-mpv)
           ("vid.*" . browse-url-mpv)
           ("vid.*" . browse-url-mpv)
+          ("*.mp4" . browse-url-mpv)
+          ("*.mp3" . browse-url-mpv)
+          ("*.ogg" . browse-url-mpv)
           ("." . eww-browse-url)
           )))
 #+end_src
@@ -445,7 +491,7 @@ Some EWW enhancements.
   (global-set-key (kbd "C-c w") 'eww)
 #+end_src
 ** IRC
-Circe is a really nice IRC client, that claims to be above RCIRC and below ERC in terms of features. ERC felt a bit messy and finicky to me, and Circe has all the features that I need. This setup gets the password for my bouncer (Pounce) instances via my =~/.authinfo.gpg= file.
+Circe is a really nice IRC client that claims to be above RCIRC and below ERC in terms of features. ERC felt a bit messy and finicky to me, and Circe has all the features that I need. This setup gets the password for my bouncer (Pounce) instances via my =~/.authinfo.gpg= file.
 #+begin_src emacs-lisp
   (defun fetch-password (&rest params)
     (require 'auth-source)
@@ -461,76 +507,125 @@ Circe is a really nice IRC client, that claims to be above RCIRC and below ERC i
     :config
     (enable-lui-track)
     (enable-circe-color-nicks)
-    (circe "libera")
-    (circe "oftc")
-    (circe "tilde")
-    (setq circe-networks '(("libera"
-                            :host "irc.armaanb.net"
-                            :nick "emacs"
-                            :user "emacs"
-                            :use-tls t
-                            :port "6698"
-                            :pass (lambda (null) (fetch-password
-                                                  :login "emacs"
-                                                  :machine "irc.armaanb.net"
-                                                  :port 6698)))
-                           ("oftc"
-                            :host "irc.armaanb.net"
-                            :nick "emacs"
-                            :user "emacs"
-                            :use-tls t
-                            :port "6699"
-                            :pass (lambda (null) (fetch-password
-                                                  :login "emacs"
-                                                  :machine "irc.armaanb.net"
-                                                  :port 6699)))
-                           ("tilde"
-                            :host "irc.armaanb.net"
-                            :nick "emacs"
-                            :user "emacs"
-                            :use-tls t
-                            :port "6696"
-                            :pass (lambda (null) (fetch-password
-                                                  :login "emacs"
-                                                  :machine "irc.armaanb.net"
-                                                  :port 6696)))
-                           ))
+    (setq circe-network-defaults '(("libera"
+                                    :host "irc.armaanb.net"
+                                    :nick "emacs"
+                                    :user "emacs"
+                                    :use-tls t
+                                    :port 6698
+                                    :pass (lambda (null) (fetch-password
+                                                          :login "emacs"
+                                                          :machine "irc.armaanb.net"
+                                                          :port 6698)))
+                                   ("oftc"
+                                    :host "irc.armaanb.net"
+                                    :nick "emacs"
+                                    :user "emacs"
+                                    :use-tls t
+                                    :port 6699
+                                    :pass (lambda (null) (fetch-password
+                                                          :login "emacs"
+                                                          :machine "irc.armaanb.net"
+                                                          :port 6699)))
+                                   ("tilde"
+                                    :host "irc.armaanb.net"
+                                    :nick "emacs"
+                                    :user "emacs"
+                                    :use-tls t
+                                    :port 6696
+                                    :pass (lambda (null) (fetch-password
+                                                          :login "emacs"
+                                                          :machine "irc.armaanb.net"
+                                                          :port 6696)))))
     :custom (circe-default-part-message "goodbye!")
     :bind (:map circe-mode-map ("C-c C-r" . circe-reconnect-all)))
+
+  (defun acheam-irc ()
+    "Open circe"
+    (interactive)
+    (if (get-buffer "irc.armaanb.net:6696")
+        (switch-to-buffer "irc.armaanb.net:6696")
+      (progn (switch-to-buffer "*scratch*")
+             (circe "libera")
+             (circe "oftc")
+             (circe "tilde"))))
+
+  (global-set-key (kbd "C-c i") 'acheam-irc)
+#+end_src
+** Calendar
+Still experimenting with this setup. Not sure if I will keep it, but it works well for seeing my calendar events. I use =vdirsyncer= to sync my calendar events which I'm really not happy with.
+#+begin_src emacs-lisp
+  (defun sync-calendar ()
+    "Sync calendars with vdirsyncer"
+    (interactive)
+    (async-shell-command "vdirsyncer sync"))
+
+  (use-package calfw
+    :bind (:map cfw:calendar-mode-map ("C-S-u" . sync-calendar)))
+  (use-package calfw-ical)
+  (use-package calfw-org)
+
+  (defun acheam-calendar ()
+    "Open calendars"
+    (interactive)
+    (cfw:open-calendar-buffer
+     :contents-sources (list
+                        (cfw:org-create-source "Green")
+                        (cfw:ical-create-source
+                         "Personal"
+                         "~/.local/share/vdirsyncer/mailbox/Y2FsOi8vMC8zMQ.ics"
+                         "Gray")
+                        (cfw:ical-create-source
+                         "Personal"
+                         "~/.local/share/vdirsyncer/mailbox/Y2FsOi8vMC8zMQ.ics"
+                         "Red")
+                        (cfw:ical-create-source
+                         "School"
+                         "~/.local/share/vdirsyncer/school/abhojwani22@nobles.edu.ics"
+                         "Cyan"))
+     :view 'week))
+
+  (global-set-key (kbd "C-c c") 'acheam-calendar)
+#+end_src
+** PDF reader
+#+begin_src emacs-lisp
+  (use-package pdf-tools
+    :hook (pdf-view-mode . pdf-view-midnight-minor-mode))
 #+end_src
 * Emacs IDE
-** Code cleanup
+** Python formatting
 #+begin_src emacs-lisp
   (use-package blacken
     :hook (python-mode . blacken-mode)
-    :config (setq blacken-line-length 79))
+    :custom (blacken-line-length 79))
 
-  ;; Purge whitespace
+#+end_src
+** Strip trailing whitespace
+#+begin_src emacs-lisp
   (use-package ws-butler
     :config (ws-butler-global-mode))
 #+end_src
 ** Flycheck
+Automatic linting. I need to look into configuring this more.
 #+begin_src emacs-lisp
   (use-package flycheck
     :config (global-flycheck-mode))
 #+end_src
 ** Project management
+I never use this, but apparently its very powerful. Another item on my todo list.
 #+begin_src emacs-lisp
   (use-package projectile
     :config (projectile-mode)
     :custom ((projectile-completion-system 'ivy))
-    :bind-keymap
-    ("C-c p" . projectile-command-map)
-    :init
-    (when (file-directory-p "~/Code")
-      (setq projectile-project-search-path '("~/Code")))
-    (setq projectile-switch-project-action #'projectile-dired))
+    :bind-keymap ("C-c p" . projectile-command-map)
+    :init (setq projectile-switch-project-action #'projectile-dired))
 
   (use-package counsel-projectile
     :after projectile
     :config (counsel-projectile-mode))
 #+end_src
 ** Dired
+The best file manager!
 #+begin_src emacs-lisp
   (use-package dired
     :straight (:type built-in)
@@ -556,72 +651,55 @@ Circe is a really nice IRC client, that claims to be above RCIRC and below ERC i
 #+end_src
 ** Git
 *** Magit
-# TODO: Write a command that commits hunk, skipping staging step.
+A very good Git interface.
 #+begin_src emacs-lisp
   (use-package magit)
 #+end_src
-*** Colored diff in line number area
-#+begin_src emacs-lisp
-  (use-package diff-hl
-    :straight (diff-hl :type git :host github :repo "dgutov/diff-hl")
-    :hook ((magit-pre-refresh-hook . diff-hl-magit-pre-refresh)
-           (magit-post-refresh-hook . diff-hl-magit-post-refresh))
-    :config (global-diff-hl-mode))
-#+end_src
 *** Email
 #+begin_src emacs-lisp
   (use-package piem)
-  (use-package git-email
-    :straight (git-email :repo "https://git.sr.ht/~yoctocell/git-email")
-    :config (git-email-piem-mode))
+  ;; (use-package git-email
+  ;;   :straight (git-email :repo "https://git.sr.ht/~yoctocell/git-email")
+  ;;   :config (git-email-piem-mode))
 #+end_src
-** Java
-*** Evaluate current buffer
-Stolen from https://stackoverflow.com/questions/19953924/how-do-you-run-java-codes-in-emacs
-#+begin_src emacs-lisp
-  (defun java-eval-buffer ()
-    "run current program (that requires no input)"
-    (interactive)
-    (let* ((source (file-name-nondirectory buffer-file-name))
-           (out    (file-name-sans-extension source))
-           (class  (concat out ".class")))
-      (save-buffer)
-      (shell-command (format "rm -f %s && javac %s" class source))
-      (if (file-exists-p class)
-          (shell-command (format "java %s" out) "*scratch*")
-        (progn
-          (set (make-local-variable 'compile-command)
-               (format "javac %s" source))
-          (command-execute 'compile)))))
+** C
+Modified from https://eklitzke.org/smarter-emacs-clang-format.
+
+Style is basically ddevault's style guide but with 4 spaces instead of 8 char tabs.
+#+begin_src emacs-lisp
+  (use-package clang-format
+    :custom (clang-format-style "{
+        BasedOnStyle: llvm,
+        AlwaysBreakAfterReturnType: AllDefinitions,
+        IndentWidth: 4,
+        }"))
+
+  (defun clang-format-buffer-smart ()
+    "Reformat buffer if .clang-format exists in the projectile root."
+    (when (file-exists-p (expand-file-name ".clang-format" (projectile-project-root)))
+      (when (if (eq major-mode 'c-mode))
+        (message "Formatting with clang-format...")
+        (clang-format-buffer))))
+
+  (add-hook 'before-save-hook 'clang-format-buffer-smart nil)
 #+end_src
 * General text editing
-** Indentation
-Indent after every change.
-#+begin_src emacs-lisp
-  (use-package aggressive-indent
-    :config (global-aggressive-indent-mode))
-#+end_src
 ** Spell checking
 Spell check in text mode, and in prog-mode comments.
 #+begin_src emacs-lisp
-  (dolist (hook '(text-mode-hook))
+  (dolist (hook '(text-mode-hook
+                  markdown-mode-hook
+                  scdoc-mode-hook))
     (add-hook hook (lambda () (flyspell-mode))))
   (dolist (hook '(change-log-mode-hook log-edit-mode-hook))
     (add-hook hook (lambda () (flyspell-mode -1))))
   (add-hook 'prog-mode (lambda () (flyspell-prog mode)))
+  (setq ispell-silently-savep t)
 #+end_src
-** Expand tabs to spaces
+** Sane tab width
 #+begin_src emacs-lisp
   (setq-default tab-width 2)
 #+end_src
-** Copy kill ring to clipboard
-#+begin_src emacs-lisp
-  (setq x-select-enable-clipboard t)
-  (defun copy-kill-ring-to-xorg ()
-    "Copy the current kill ring to the xorg clipboard."
-    (interactive)
-    (x-select-text (current-kill 0)))
-#+end_src
 ** Save place
 Opens file where you left it.
 #+begin_src emacs-lisp
@@ -631,11 +709,10 @@ Opens file where you left it.
 Distraction free writing a la junegunn/goyo.
 #+begin_src emacs-lisp
   (use-package olivetti
-    :config
-    (evil-leader/set-key "o" 'olivetti-mode))
+    :bind ("C-c o" . olivetti-mode))
 #+end_src
 ** Abbreviations
-Abbreviate things!
+Abbreviate things! I just use this for things like my email address and copyright notice.
 #+begin_src emacs-lisp
   (setq abbrev-file-name "~/.emacs.d/abbrevs.el")
   (setq save-abbrevs 'silent)
@@ -645,14 +722,10 @@ Abbreviate things!
 #+begin_src emacs-lisp
   (setq tramp-default-method "ssh")
 #+end_src
-** Don't ask about following symlinks in vc
+** Follow version controlled symlinks
 #+begin_src emacs-lisp
   (setq vc-follow-symlinks t)
 #+end_src
-** Don't ask to save custom dictionary
-#+begin_src emacs-lisp
-  (setq ispell-silently-savep t)
-#+end_src
 ** Open file as root
 #+begin_src emacs-lisp
   (defun doas-edit (&optional arg)
@@ -671,6 +744,17 @@ Abbreviate things!
 
     (global-set-key (kbd "C-x C-r") #'doas-edit)
 #+end_src
+** Markdown mode
+#+begin_src emacs-lisp
+  (use-package markdown-mode)
+#+end_src
+** scdoc mode
+Get it for yourself at https://git.armaanb.net/scdoc
+#+begin_src emacs-lisp
+  (add-to-list 'load-path "~/src/scdoc-mode")
+  (autoload 'scdoc-mode "scdoc-mode" "Major mode for editing scdoc files" t)
+  (add-to-list 'auto-mode-alist '("\\.scd\\'" . scdoc-mode))
+#+end_src
 * Keybindings
 ** Switch windows
 #+begin_src emacs-lisp
@@ -683,14 +767,15 @@ Makes "C-x k" binding faster.
   (substitute-key-definition 'kill-buffer 'kill-buffer-and-window global-map)
 #+end_src
 * Other settings
-** OpenSCAD
+** OpenSCAD syntax
 #+begin_src emacs-lisp
   (use-package scad-mode)
 #+end_src
-** Control backup files
+** Control backup and lock files
 Stop backup files from spewing everywhere.
 #+begin_src emacs-lisp
-  (setq backup-directory-alist `(("." . "~/.emacs.d/backups")))
+  (setq backup-directory-alist `(("." . "~/.emacs.d/backups"))
+        create-lockfiles nil)
 #+end_src
 ** Make yes/no easier
 #+begin_src emacs-lisp
@@ -731,66 +816,60 @@ No more clogging up init.el.
 #+begin_src emacs-lisp
   (use-package 0x0
     :straight (0x0 :type git :repo "https://git.sr.ht/~zge/nullpointer-emacs")
-    :custom (0x0-default-service 'envs)
-    :config (evil-leader/set-key
-              "00" '0x0-upload
-              "0f" '0x0-upload-file
-              "0s" '0x0-upload-string
-              "0c" '0x0-upload-kill-ring
-              "0p" '0x0-upload-popup))
+    :custom (0x0-default-service 'envs))
 #+end_src
+*** TODO Replace this with uploading to my own server
+Similar to the ufile alias in my ashrc
 ** Automatically clean buffers
+Automatically close unused buffers (except those of Circe) at midnight.
 #+begin_src emacs-lisp
-  ;; Don't kill Circe buffers
-  (add-to-list 'clean-buffer-list-kill-never-regexps (lambda (buffer-name)
-                                                       (with-current-buffer buffer-name
-                                                         (derived-mode-p 'lui-mode))))
   (midnight-mode)
+  (add-to-list 'clean-buffer-list-kill-never-regexps
+               (lambda (buffer-name)
+                 (with-current-buffer buffer-name
+                   (derived-mode-p 'lui-mode))))
 #+end_src
 * Tangles
 ** Spectrwm
+Spectrwm is a really awesome window manager! Would highly recommend.
 *** General settings
 #+begin_src conf :tangle ~/.spectrwm.conf
   workspace_limit = 5
   warp_pointer = 1
   modkey = Mod4
-  autorun = ws[1]:/home/armaa/Code/scripts/autostart
+  autorun = ws[1]:/home/armaa/src/bin/autostart
 #+end_src
 *** Bar
+Disable the bar by default (it can still be brought back up with MOD+b). The font just needs to be set to something that you have installed, otherwise spectrwm won't launch.
 #+begin_src conf :tangle ~/.spectrwm.conf
   bar_enabled = 0
-  bar_font = xos4 Fira Code:pixelsize=14:antialias=true # any installed font
+  bar_font = xos4 JetBrains Mono:pixelsize=14:antialias=true # any installed font
 #+end_src
 *** Keybindings
+I'm not a huge fan of how spectrwm handles keybindings, probably my biggest gripe with it.
 **** WM actions
 #+begin_src conf :tangle ~/.spectrwm.conf
   program[term] = st -e tmux
-  program[screenshot_all] = flameshot gui
-  program[notif] = /home/armaa/Code/scripts/setter status
-  program[pass] = /home/armaa/Code/scripts/passmenu
+  program[notif] = /home/armaa/src/bin/setter status
+  program[pass] = /home/armaa/src/bin/passmenu
+  program[lock] = slock
 
   bind[notif] = MOD+n
   bind[pass] = MOD+Shift+p
 #+end_src
 **** Media keys
 #+begin_src conf :tangle ~/.spectrwm.conf
-  program[paup] = /home/armaa/Code/scripts/setter audio +5
-  program[padown] = /home/armaa/Code/scripts/setter audio -5
-  program[pamute] = /home/armaa/Code/scripts/setter audio
-  program[brigup] = /home/armaa/Code/scripts/setter brightness +10%
-  program[brigdown] = /home/armaa/Code/scripts/setter brightness 10%-
-  program[next] = playerctl next
-  program[prev] = playerctl previous
-  program[pause] = playerctl play-pause
+  program[paup] = /home/armaa/src/bin/setter audio +5
+  program[padown] = /home/armaa/src/bin/setter audio -5
+  program[pamute] = /home/armaa/src/bin/setter audio
+  program[brigup] = /home/armaa/src/bin/setter brightness +10%
+  program[brigdown] = /home/armaa/src/bin/setter brightness 10%-
 
   bind[padown] = XF86AudioLowerVolume
   bind[paup] = XF86AudioRaiseVolume
   bind[pamute] = XF86AudioMute
   bind[brigdown] = XF86MonBrightnessDown
   bind[brigup] = XF86MonBrightnessUp
-  bind[pause] = XF86AudioPlay
-  bind[next] = XF86AudioNext
-  bind[prev] = XF86AudioPrev
 #+end_src
 **** HJKL
 #+begin_src conf :tangle ~/.spectrwm.conf
@@ -806,78 +885,38 @@ No more clogging up init.el.
 #+end_src
 **** Programs
 #+begin_src conf :tangle ~/.spectrwm.conf
-  program[email] = emacsclient -c --eval "(mu4e)"
-  program[irc] = emacsclient -c --eval '(switch-to-buffer "irc.armaanb.net:6698")'
-  program[rss] = emacsclient -c --eval '(elfeed)'
+  program[email] = emacsclient -ce '(progn (switch-to-buffer "*scratch*") (mu4e))'
+  program[irc] = emacsclient -ce '(acheam-irc)'
+  program[rss] = emacsclient -ce '(elfeed)'
+  program[calendar] = emacsclient -ce '(acheam-calendar)'
+  program[calc] = emacsclient -ce '(progn (calc) (windmove-up) (delete-window))'
   program[emacs] = emacsclient -c
-  program[firefox] = firefox
-  program[calc] = st -e because -l
+  program[bookmarks] = /home/armaa/src/bin/bookmarks
+  program[browser] = chorizo
 
   bind[email] = MOD+Control+1
   bind[irc] = MOD+Control+2
   bind[rss] = MOD+Control+3
-  bind[firefox] = MOD+Control+4
+  bind[calendar] = MOD+Control+4
   bind[calc] = MOD+Control+5
   bind[emacs] = MOD+Control+Return
+  bind[bookmarks] = MOD+Control+o
+  bind[browser] = MOD+Control+p
 #+end_src
-**** Quirks
+*** Quirks
+Float some specific programs by default.
 #+begin_src conf :tangle ~/.spectrwm.conf
   quirk[Castle Menu] = FLOAT
   quirk[momen] = FLOAT
+  quirk[pinentry-fltk] = FLOAT
 #+end_src
 ** Ash
 *** Options
+Use the vi editing mode. I still haven't found a good way to show visual feedback of the current mode. Ideally the cursor would change to a beam when in insert mode, and a box when in normal mode.
 #+begin_src conf :tangle ~/.config/ash/ashrc
   set -o vi
 #+end_src
 *** Functions
-**** Update all packages
-#+begin_src shell :tangle ~/.config/ash/ashrc
-  color=$(tput setaf 5)
-  reset=$(tput sgr0)
-
-  apu() {
-      doas echo "${color}== upgrading with yay ==${reset}"
-      yay
-      echo ""
-      echo "${color}== checking for pacnew files ==${reset}"
-      doas pacdiff
-      echo
-      echo "${color}== upgrading flatpaks ==${reset}"
-      flatpak update
-      echo ""
-      echo "${color}== updating nvim plugins ==${reset}"
-      nvim +PlugUpdate +PlugUpgrade +qall
-      echo "Updated nvim plugins"
-      echo ""
-      echo "${color}You are entirely up to date!${reset}"
-  }
-#+end_src
-**** Clean all packages
-#+begin_src shell :tangle ~/.config/ash/ashrc
-  apap() {
-      doas echo "${color}== cleaning pacman orphans ==${reset}"
-      (pacman -Qtdq | doas pacman -Rns - 2> /dev/null) || echo "No orphans"
-      echo ""
-      echo "${color}== cleaning flatpaks ==${reset}"
-      flatpak remove --unused
-      echo ""
-      echo "${color}== cleaning nvim plugins ==${reset}"
-      nvim +PlugClean +qall
-      echo "Cleaned nvim plugins"
-      echo ""
-      echo "${color}All orphans cleaned!${reset}"
-  }
-#+end_src
-**** Interact with 0x0
-#+begin_src shell :tangle ~/.config/ash/ashrc
-  zxz="https://envs.sh"
-  ufile() { curl -F"file=@$1" "$zxz" ; }
-  upb() { curl -F"file=@-;" "$zxz" ; }
-  uurl() { curl -F"url=$1" "$zxz" ; }
-  ushort() { curl -F"shorten=$1" "$zxz" ; }
-  uclip() { xclip -out | curl -F"file=@-;" "$zxz" ; }
-#+end_src
 **** Finger
 #+begin_src shell :tangle ~/.config/ash/ashrc
   finger() {
@@ -888,46 +927,91 @@ No more clogging up init.el.
 #+end_src
 **** Upload to ftp.armaanb.net
 #+begin_src shell :tangle ~/.config/ash/ashrc
-  pubup() {
-      rsync "$1" "root@armaanb.net:/var/ftp/pub/${2}"
-      echo "https://ftp.armaanb.net/pub/"$(basename "$1") | tee /dev/tty | xclip -sel c
+  _uprint() {
+      echo "https://l.armaanb.net/$(basename "$1")" | tee /dev/tty | xclip -sel c
+  }
+
+  _uup() {
+      rsync "$1" "armaa@armaanb.net:/srv/ftp/pub/$2" --chmod 644 --progress
+  }
+
+  ufile() {
+      _uup "$1" "$2"
+      _uprint "$1"
+  }
+
+  uclip() {
+      tmp=$(mktemp)
+      xclip -o -sel c >> "$tmp"
+      basetmp=$(echo "$tmp" | tail -c +5)
+      _uup "$tmp" "$basetmp"
+      _uprint "$basetmp"
+      rm -f "$tmp"
   }
 #+end_src
 *** Exports
+**** Default programs
 #+begin_src shell :tangle ~/.config/ash/ashrc
   export EDITOR="emacsclient -c"
   export VISUAL="$EDITOR"
   export TERM=xterm-256color # for compatability
-
+  #+end_src
+**** General program configs
+#+begin_src shell :tangle ~/.config/ash/ashrc
   export GPG_TTY="$(tty)"
   export MANPAGER='nvim +Man!'
   export PAGER='less'
-
   export GTK_USE_PORTAL=1
-
-  export PATH="/home/armaa/.local/bin:$PATH" # prioritize .local/bin
-  export PATH="/home/armaa/Code/scripts:$PATH" # prioritize my scripts
-  export PATH="/home/armaa/Code/scripts/bin:$PATH" # prioritize my bins
-  export PATH="$PATH:/home/armaa/.cargo/bin"
-  export PATH="$PATH:/home/armaa/.local/share/gem/ruby/2.7.0/bin"
-  export PATH="$PATH:/usr/sbin"
-  export PATH="$PATH:/opt/FreeTube/freetube"
-
+  export CDPATH=:~
+  export LESSHISTFILE=/dev/null
+  export PASH_KEYID=me@armaanb.net
+  export PASH_LENGTH=20
+#+end_src
+**** PATH
+#+begin_src shell :tangle ~/.config/ash/ashrc
+  export PATH="/home/armaa/src/bin:$PATH"
+  export PATH="/home/armaa/src/bin/bin:$PATH"
+  export PATH="/home/armaa/.local/bin:$PATH"
+  export PATH="/usr/lib/ccache/bin:$PATH"
+#+end_src
+**** Locale
+#+begin_src shell :tangle ~/.config/ash/ashrc
   export LC_ALL="en_US.UTF-8"
   export LC_CTYPE="en_US.UTF-8"
   export LANGUAGE="en_US.UTF-8"
-
-  export KISS_PATH="/home/armaa/Virtual/kiss/home/armaa/kiss-repo"
-  export KISS_PATH="$KISS_PATH:/home/armaa/Clone/repo-main/core"
-  export KISS_PATH="$KISS_PATH:/home/armaa/Clone/repo-main/extra"
-  export KISS_PATH="$KISS_PATH:/home/armaa/Clone/repo-main/xorg"
-  export KISS_PATH="$KISS_PATH:/home/armaa/Clone/repo-main/testing"
-  export KISS_PATH="$KISS_PATH:/home/armaa/Clone/repo-community/community"
+  export TZ="America/New_York"
+#+end_src
+**** KISS
+#+begin_src shell :tangle ~/.config/ash/ashrc
+  export KISS_PATH=""
+  export KISS_PATH="$KISS_PATH:$HOME/repos/personal"
+  export KISS_PATH="$KISS_PATH:$HOME/repos/bin/bin"
+  export KISS_PATH="$KISS_PATH:$HOME/repos/main/core"
+  export KISS_PATH="$KISS_PATH:$HOME/repos/main/extra"
+  export KISS_PATH="$KISS_PATH:$HOME/repos/main/xorg"
+  export KISS_PATH="$KISS_PATH:$HOME/repos/community/community"
+  export KISS_PATH="$KISS_PATH:$HOME/repos/mid/ports"
+#+end_src
+**** Compilation flags
+#+begin_src shell :tangle ~/.config/ash/ashrc
+  export CFLAGS="-O3 -pipe -march=native"
+  export CXXFLAGS="$CFLAGS"
+  export MAKEFLAGS="-j$(nproc)"
+  export PKG_CONFIG_PATH="$PKG_CONFIG_PATH:/usr/local/lib/pkgconfig"
+#+end_src
+**** XDG desktop dirs
+#+begin_src shell :tangle ~/.config/ash/ashrc
+  export XDG_DESKTOP_DIR="/dev/null"
+  export XDG_DOCUMENTS_DIR="$HOME/documents"
+  export XDG_DOWNLOAD_DIR="$HOME/downloads"
+  export XDG_MUSIC_DIR="$HOME/music"
+  export XDG_PICTURES_DIR="$HOME/pictures"
+  export XDG_VIDEOS_DIR="$HOME/videos"
 #+end_src
 *** Aliases
 **** SSH
 #+begin_src shell :tangle ~/.config/ash/ashrc
-  alias bhoji-drop='ssh -p 23 root@armaanb.net'
+  alias poki='ssh armaanb.net'
   alias irc='ssh root@armaanb.net -t abduco -A irc catgirl freenode'
   alias union='ssh 192.168.1.18'
   alias mine='ssh -p 23 root@pickupserver.cc'
@@ -939,18 +1023,18 @@ No more clogging up init.el.
 #+end_src
 **** File management
 #+begin_src shell :tangle ~/.config/ash/ashrc
-  alias ls='ls -lh --group-directories-first'
+  alias ls='LC_COLLATE=C ls -lh --group-directories-first'
   alias la='ls -A'
   alias df='df -h / /boot'
   alias du='du -h'
-  alias free='free -h'
+  alias free='free -m'
   alias cp='cp -riv'
   alias rm='rm -iv'
   alias mv='mv -iv'
   alias ln='ln -v'
-  alias grep='grep -in --color=auto'
+  alias grep='grep -in'
   alias mkdir='mkdir -pv'
-  alias lanex='java -jar ~/.local/share/lxc/lanxchange.jar'
+  alias lanex='java -jar ~/.local/share/lxc/lanxchange.jar && rm lxc*'
   emacs() { $EDITOR "$@" & }
   alias vim="emacs"
 #+end_src
@@ -968,19 +1052,19 @@ No more clogging up init.el.
   alias gps='gpg --keyserver keyserver.ubuntu.com --search-keys'
   alias gpp='gpg --keyserver keyserver.ubuntu.com --recv-key'
   alias plan='T=$(mktemp) && \
-        rsync root@armaanb.net:/etc/finger/plan.txt "$T" && \
-        TT=$(mktemp) && \
-        head -n -2 $T > $TT && \
-        vim $TT && \
-        echo "\nLast updated: $(date -R)" >> "$TT" && \
-        fold -sw 72 "$TT" > "$T"| \
-        rsync "$T" root@armaanb.net:/etc/finger/plan.txt'
+          rsync armaanb.net:/home/armaa/plan.txt "$T" && \
+          TT=$(mktemp) && \
+          head -n -2 $T > $TT && \
+          /bin/nvim $TT && \
+          echo >> "$TT" && \
+          echo "Last updated: $(date -R)" >> "$TT" && \
+          fold -sw 72 "$TT" > "$T"| \
+          rsync "$T" armaanb.net:/home/armaa/plan.txt && \
+          rm -f "$T"'
 #+end_src
 **** Virtual machines, chroots
 #+begin_src shell :tangle ~/.config/ash/ashrc
-  alias ckiss="doas chrooter ~/Virtual/kiss"
-  alias cdebian="doas chrooter ~/Virtual/debian bash"
-  alias cwindows='devour qemu-system-x86_64 \
+  alias cwindows='qemu-system-x86_64 \
     -smp 3 \
     -cpu host \
     -enable-kvm \
@@ -989,51 +1073,24 @@ No more clogging up init.el.
     -device intel-hda \
     -device hda-duplex \
     -net nic \
-    -net user,smb=/home/armaa/Public \
-    -drive format=qcow2,file=/home/armaa/Virtual/windows.qcow2'
-#+end_src
-**** Python
-#+begin_src shell :tangle ~/.config/ash/ashrc
-  alias pip="python -m pip"
-  alias black="black -l 79"
+    -net user,smb=/home/armaa/public \
+    -drive format=qcow2,file=/home/armaa/virtual/windows.qcow2'
 #+end_src
 **** Latin
 #+begin_src shell :tangle ~/.config/ash/ashrc
   alias words='gen-shell -c "words"'
   alias words-e='gen-shell -c "words ~E"'
 #+end_src
-**** Devour
-#+begin_src shell :tangle ~/.config/ash/ashrc
-  alias zathura='devour zathura'
-  alias cad='devour openscad'
-  alias feh='devour feh'
-#+end_src
-**** Pacman
-#+begin_src shell :tangle ~/.config/ash/ashrc
-  alias aps='yay -Ss'
-  alias api='yay -Syu'
-  alias apii='doas pacman -S'
-  alias app='yay -Rns'
-  alias azf='pacman -Q | fzf'
-  alias favorites='pacman -Qe | cut -d " " -f 1 > ~/Documents/favorites'
-#+end_src
 **** Other
 #+begin_src shell :tangle ~/.config/ash/ashrc
   alias bigrandomfile='dd if=/dev/urandom of=1GB-urandom bs=1M count=1024 \
-    iflag=fullblock status=progress'
+    iflag=fullblock'
   alias bigboringfile='dd if=/dev/zero of=1GB-zero bs=1M count=1024 \
-    iflag=fullblock status=progress'
+    iflag=fullblock'
   alias ytmusic="youtube-dl -x --add-metadata  --audio-format aac \
     --restrict-filenames -o '%(title)s.%(ext)s'"
-  alias cal="cal -3 --color=auto"
   alias bc='bc -l'
 #+end_src
-** IPython
-#+begin_src python :tangle ~/.ipython/profile_default/ipython_config.py
-  c.TerminalInteractiveShell.editing_mode = 'vi'
-  c.InteractiveShell.colors = 'linux'
-  c.TerminalInteractiveShell.confirm_exit = False
-#+end_src
 ** MPV
 Make MPV play a little bit smoother.
 #+begin_src conf :tangle ~/.config/mpv/mpv.conf
@@ -1041,7 +1098,7 @@ Make MPV play a little bit smoother.
   hwdec=auto-copy
 #+end_src
 ** Inputrc
-For any GNU Readline programs
+This file is used for any GNU Readline programs. I use Emacs editing mode mostly because of one annoyance which is that to clear the screen using ^L, you have to be in normal mode which is a pain. If there is a way to rebind this, I'd love to know!.
 #+begin_src conf :tangle ~/.inputrc
   set editing-mode emacs
 #+end_src
@@ -1072,7 +1129,7 @@ For any GNU Readline programs
   smtpserverport = 465
   confirm = auto
 #+end_src
-*** Submodules
+*** Submodule
 #+begin_src conf :tangle ~/.gitconfig
   [submodule]
   recurse = true
@@ -1092,70 +1149,19 @@ For any GNU Readline programs
   loc = diff --stat 4b825dc642cb6eb9a060e54bf8d69288fbee4904 # Empty hash
   pushnc = push -o skip-ci
 #+end_src
-*** Commits
+*** Commit
 #+begin_src conf :tangle ~/.gitconfig
   [commit]
   gpgsign = true
   verbose = true
 #+end_src
-** Dunst
-Lightweight notification daemon.
-*** General
-#+begin_src conf :tangle ~/.config/dunst/dunstrc
-  [global]
-  font = "JetBrains Mono Medium Nerd Font 11"
-  allow_markup = yes
-  format = "<b>%s</b>\n%b"
-  sort = no
-  indicate_hidden = yes
-  alignment = center
-  bounce_freq = 0
-  show_age_threshold = 60
-  word_wrap = yes
-  ignore_newline = no
-  geometry = "400x5-10+10"
-  transparency = 0
-  idle_threshold = 120
-  monitor = 0
-  sticky_history = yes
-  line_height = 0
-  separator_height = 1
-  padding = 8
-  horizontal_padding = 8
-  max_icon_size = 32
-  separator_color = "#ffffff"
-  startup_notification = false
-#+end_src
-*** Modes
-#+begin_src conf :tangle ~/.config/dunst/dunstrc
-  [frame]
-  width = 1
-  color = "#ffffff"
-
-  [shortcuts]
-  close = mod4+c
-  close_all = mod4+shift+c
-  history = mod4+ctrl+c
-
-  [urgency_low]
-  background = "#222222"
-  foreground = "#ffffff"
-  highlight = "#ffffff"
-  timeout = 5
-
-  [urgency_normal]
-  background = "#222222"
-  foreground = "#ffffff"
-  highlight = "#ffffff"
-  timeout = 15
-
-  [urgency_critical]
-  background = "#222222"
-  foreground = "#a60000"
-  highlight = "#ffffff"
-  timeout = 0
+*** Tag
+#+begin_src conf :tangle ~/.gitconfig
+  [tag]
+  gpgsign = true
 #+end_src
 ** Zathura
+The best document reader!
 *** Options
 #+begin_src conf :tangle ~/.config/zathura/zathurarc
   map <C-i> recolor
@@ -1178,58 +1184,8 @@ Lightweight notification daemon.
   set recolor-darkcolor  "#ffffff" # fg
   set recolor            "true"
 #+end_src
-** Firefox
-*** Swap tab and URL bars
-#+begin_src css :tangle ~/.mozilla/firefox/armaan-release/chrome/userChrome.css
-  #nav-bar {
-      -moz-box-ordinal-group: 1 !important;
-  }
-
-  #PersonalToolbar {
-      -moz-box-ordinal-group: 2 !important;
-  }
-
-  #titlebar {
-      -moz-box-ordinal-group: 3 !important;
-  }
-#+end_src
-*** Hide URL bar when not focused.
-#+begin_src css :tangle ~/.mozilla/firefox/armaan-release/chrome/userChrome.css
-  #navigator-toolbox:not(:focus-within):not(:hover) {
-      margin-top: -30px;
-  }
-
-  #navigator-toolbox {
-      transition: 0.1s margin-top ease-out;
-  }
-#+end_src
-*** Black screen by default
-userChrome.css:
-#+begin_src css :tangle ~/.mozilla/firefox/armaan-release/chrome/userChrome.css
-  #main-window,
-  #browser,
-  #browser vbox#appcontent tabbrowser,
-  #content,
-  #tabbrowser-tabpanels,
-  #tabbrowser-tabbox,
-  browser[type="content-primary"],
-  browser[type="content"] > html,
-  .browserContainer {
-      background: black !important;
-      color: #fff !important;
-  }
-#+end_src
-
-userContent.css:
-#+begin_src css :tangle ~/.mozilla/firefox/armaan-release/chrome/userContent.css
-  @-moz-document url("about:home"), url("about:blank"), url("about:newtab") {
-      body {
-          background: black !important;
-      }
-  }
-#+end_src
 ** Xresources
-Modus operandi theme.
+Modus operandi theme. No program I use checks for anything beyond foreground and background, but hey, it can't hurt to have all the colors in there.
 #+begin_src conf :tangle ~/.Xresources
   ! special
   ,*.foreground:   #ffffff
@@ -1269,9 +1225,11 @@ Modus operandi theme.
   ,*.color15:      #dddddd
 #+end_src
 ** Tmux
+I use tmux in order to keep my st build light. Still learning how it works.
 #+begin_src conf :tangle ~/.tmux.conf
   set -g status off
   set -g mouse on
+  set-option -g history-limit 50000
   set-window-option -g mode-keys vi
   bind-key -T copy-mode-vi 'v' send -X begin-selection
   bind -T copy-mode-vi y send-keys -X copy-pipe-and-cancel 'xclip -in -selection clipboard'
@@ -1284,8 +1242,27 @@ Modus operandi theme.
 #+end_src
 *** Agent
 #+begin_src conf :tangle ~/.gnupg/gpg-agent.conf
-  pinentry-program /sbin/pinentry-gnome3
-  max-cache-ttl 600
-  default-cache-ttl 600
+  pinentry-program /sbin/pinentry
+  max-cache-ttl 6000
+  default-cache-ttl 6000
   allow-emacs-pinentry
 #+end_src
+** Xmodmap
+#+begin_src conf :tangle (progn (if (string= (system-name) "frost.armaanb.net") "~/.config/xmodmap" "no"))
+  ! Unmap left super
+  clear mod4
+
+  ! Turn right alt into super
+  remove mod1 = Alt_R
+  add mod4 = Alt_R
+
+  ! Swap caps and control
+  remove Lock = Caps_Lock
+  remove Control = Control_L
+  remove Lock = Control_L
+  remove Control = Caps_Lock
+  keysym Control_L = Caps_Lock
+  keysym Caps_Lock = Control_L
+  add Lock = Caps_Lock
+  add Control = Control_L
+#+end_src