config.org

   1 #+TITLE: System Configuration
   2 #+DESCRIPTION: Personal system configuration in org-mode format.
   3 #+AUTHOR: Armaan Bhojwani
   4 #+EMAIL: me@armaanb.net
   5
   6 * Welcome
   7 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!
   8 ** Compatability
   9 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.
  10 ** Choices
  11 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.
  12
  13 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.
  14
  15 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.
  16 ** License
  17 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.
  18 * Package management
  19 ** Bootstrap straight.el
  20 straight.el is really nice for managing package, and it integrates nicely with use-package. It uses the bootstrapping system defined here for installation.
  21 #+begin_src emacs-lisp
  22   (defvar native-comp-deferred-compilation-deny-list ())
  23   (defvar bootstrap-version)
  24   (let ((bootstrap-file
  25          (expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory))
  26         (bootstrap-version 5))
  27     (unless (file-exists-p bootstrap-file)
  28       (with-current-buffer
  29           (url-retrieve-synchronously
  30            "https://raw.githubusercontent.com/raxod502/straight.el/develop/install.el"
  31            'silent 'inhibit-cookies)
  32         (goto-char (point-max))
  33         (eval-print-last-sexp)))
  34     (load bootstrap-file nil 'nomessage))
  35 #+end_src
  36 ** Replace package.el with straight
  37 #+begin_src emacs-lisp
  38   (straight-use-package 'use-package)
  39   (setq straight-use-package-by-default t)
  40 #+end_src
  41 * Visual options
  42 ** Theme
  43 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.
  44 #+begin_src emacs-lisp
  45   (use-package modus-themes
  46     :custom
  47     (modus-themes-slanted-constructs t)
  48     (modus-themes-bold-constructs t)
  49     (modus-themes-mode-line '3d)
  50     (modus-themes-scale-headings t)
  51     (modus-themes-diffs 'desaturated)
  52     :config (load-theme 'modus-vivendi t))
  53 #+end_src
  54 ** Typography
  55 *** Font
  56 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]].
  57 #+begin_src emacs-lisp
  58   (add-to-list 'default-frame-alist '(font . "JetBrainsMonoNF-12"))
  59 #+end_src
  60 *** Ligatures
  61 #+begin_src emacs-lisp
  62   (use-package ligature
  63     :straight (ligature :type git :host github :repo "mickeynp/ligature.el")
  64     :config
  65     (ligature-set-ligatures
  66      '(prog-mode text-mode)
  67      '("-|" "-~" "---" "-<<" "-<" "--" "->" "->>" "-->" "/=" "/=="
  68        "/>" "//" "/*" "*>" "*/" "<-" "<<-" "<=>" "<=" "<|" "<||"
  69        "<|||" "<|>" "<:" "<>" "<-<" "<<<" "<==" "<<=" "<=<" "<==>"
  70        "<-|" "<<" "<~>" "<=|" "<~~" "<~" "<$>" "<$" "<+>" "<+" "</>"
  71        "</" "<*" "<*>" "<->" "<!--" ":>" ":<" ":::" "::" ":?" ":?>"
  72        ":=" "::=" "=>>" "==>" "=/=" "=!=" "=>" "===" "=:=" "==" "!=="
  73        "!!" "!=" ">]" ">:" ">>-" ">>=" ">=>" ">>>" ">-" ">=" "&&&"
  74        "&&" "|||>" "||>" "|>" "|]" "|}" "|=>" "|->" "|=" "||-" "|-"
  75        "||=" "||" ".." ".?" ".=" ".-" "..<" "..." "+++" "+>" "++"
  76        "[||]" "[<" "[|" "{|" "?." "?=" "?:" "##" "###" "####" "#["
  77        "#{" "#=" "#!" "#:" "#_(" "#_" "#?" "#(" ";;" "_|_" "__" "~~"
  78        "~~>" "~>" "~-" "~@" "$>" "^=" "]#"))
  79     ;; (global-ligature-mode t))
  80     )
  81 #+end_src
  82 ** Line numbers
  83 Display relative line numbers except in certain modes.
  84 #+begin_src emacs-lisp
  85   (global-display-line-numbers-mode)
  86   (setq display-line-numbers-type 'relative)
  87   (dolist (no-line-num '(term-mode-hook
  88                          pdf-view-mode-hook
  89                          shell-mode-hook
  90                          org-mode-hook
  91                          circe-mode-hook
  92                          eshell-mode-hook))
  93     (add-hook no-line-num (lambda () (display-line-numbers-mode 0))))
  94 #+end_src
  95 ** Highlight matching parenthesis
  96 #+begin_src emacs-lisp
  97   (use-package paren
  98     :config (show-paren-mode)
  99     :custom (show-paren-style 'parenthesis))
 100 #+end_src
 101 ** Modeline
 102 *** Show current function
 103 #+begin_src emacs-lisp
 104   (which-function-mode)
 105 #+end_src
 106 *** Make position in file more descriptive
 107 Show current column and file size.
 108 #+begin_src emacs-lisp
 109   (column-number-mode)
 110   (size-indication-mode)
 111 #+end_src
 112 *** Hide minor modes
 113 #+begin_src emacs-lisp
 114   (use-package minions
 115     :config (minions-mode))
 116 #+end_src
 117 ** Whitespace mode
 118 Highlight whitespace and other bad text practices.
 119 #+begin_src emacs-lisp
 120   (use-package whitespace
 121     :custom (whitespace-style '(face lines-tail)))
 122   (dolist (hook '(prog-mode-hook))
 123     (add-hook hook (lambda () (whitespace-mode 1))))
 124 #+end_src
 125 ** Highlight todo items in comments
 126 +begin_src emacs-lisp
 127   (use-package hl-todo
 128     :straight (hl-todo :type git :host github :repo "tarsius/hl-todo")
 129     :config (global-hl-todo-mode 1))
 130 #+end_src
 131 ** Blink cursor
 132 #+begin_src emacs-lisp
 133   (blink-cursor-mode)
 134 #+end_src
 135 ** Visual line mode
 136 Soft wrap words and do operations by visual lines in some modes.
 137 #+begin_src emacs-lisp
 138   (dolist (hook '(text-mode-hook
 139                   org-mode-hook
 140                   markdown-mode-hook
 141                   mu4e-view-mode-hook))
 142     (add-hook hook (lambda () (visual-line-mode 1))))
 143 #+end_src
 144 ** Auto fill mode
 145 #+begin_src emacs-lisp
 146   (dolist (hook '(scdoc-mode-hook
 147                   mu4e-compose-mode-hook))
 148     (add-hook hook (lambda () (auto-fill-mode 1))))
 149 #+end_src
 150 ** Display number of matches in search
 151 #+begin_src emacs-lisp
 152   (use-package anzu
 153     :config (global-anzu-mode)
 154     :bind
 155     ([remap query-replace] . anzu-query-replace)
 156     ([remap query-replace-regexp] . anzu-query-replace-regexp))
 157 #+end_src
 158 *** TODO This config doesn't work right
 159 ** Visual bell
 160 Invert modeline color instead of audible bell or the standard visual bell.
 161 #+begin_src emacs-lisp
 162   (setq visible-bell nil
 163         ring-bell-function
 164         (lambda () (invert-face 'mode-line)
 165           (run-with-timer 0.1 nil #'invert-face 'mode-line)))
 166 #+end_src
 167 * Evil mode
 168 ** General
 169 #+begin_src emacs-lisp
 170   (use-package evil
 171     :custom (select-enable-clipboard nil)
 172     :config
 173     (evil-mode)
 174     (fset 'evil-visual-update-x-selection 'ignore) ;; Keep clipboard and register seperate
 175     ;; Use visual line motions even outside of visual-line-mode buffers
 176     (evil-global-set-key 'motion "j" 'evil-next-visual-line)
 177     (evil-global-set-key 'motion "k" 'evil-previous-visual-line)
 178     (global-set-key (kbd "<escape>") 'keyboard-escape-quit))
 179 #+end_src
 180 ** Evil collection
 181 Evil bindings for tons of packages.
 182 #+begin_src emacs-lisp
 183   (use-package evil-collection
 184     :after evil
 185     :init (evil-collection-init)
 186     :custom (evil-collection-setup-minibuffer t))
 187 #+end_src
 188 ** Surround
 189 tpope prevails!
 190 #+begin_src emacs-lisp
 191   (use-package evil-surround
 192     :config (global-evil-surround-mode))
 193 #+end_src
 194 ** Nerd commenter
 195 Makes commenting super easy
 196 #+begin_src emacs-lisp
 197   (use-package evil-nerd-commenter
 198     :bind (:map evil-normal-state-map
 199                 ("gc" . evilnc-comment-or-uncomment-lines))
 200     :custom (evilnc-invert-comment-line-by-line nil))
 201 #+end_src
 202 ** Undo redo
 203 Fix the oopsies!
 204 #+begin_src emacs-lisp
 205   (use-package undo-fu
 206     :config (evil-set-undo-system 'undo-fu))
 207
 208   (use-package undo-fu-session
 209     :config (global-undo-fu-session-mode))
 210 #+end_src
 211 ** Number incrementing
 212 Add back C-a/C-x bindings.
 213 #+begin_src emacs-lisp
 214   (use-package evil-numbers
 215     :straight (evil-numbers :type git :host github :repo "juliapath/evil-numbers")
 216     :bind (:map evil-normal-state-map
 217                 ("C-M-a" . evil-numbers/inc-at-pt)
 218                 ("C-M-x" . evil-numbers/dec-at-pt)))
 219 #+end_src
 220 ** Evil org
 221 #+begin_src emacs-lisp
 222   (use-package evil-org
 223     :after org
 224     :hook (org-mode . evil-org-mode)
 225     :config
 226     (evil-org-set-key-theme '(textobjects insert navigation shift todo)))
 227
 228   (use-package evil-org-agenda
 229     :straight (:type built-in)
 230     :after evil-org
 231     :config (evil-org-agenda-set-keys))
 232 #+end_src
 233 * Org mode
 234 ** General
 235 #+begin_src emacs-lisp
 236   (use-package org
 237     :straight (:type built-in)
 238     :commands (org-capture org-agenda)
 239     :custom
 240     (org-ellipsis " ▾")
 241     (org-agenda-start-with-log-mode t)
 242     (org-agenda-files (quote ("~/org/tasks.org")))
 243     (org-log-done 'time)
 244     (org-log-into-drawer t)
 245     (org-src-tab-acts-natively t)
 246     (org-src-fontify-natively t)
 247     (org-startup-indented t)
 248     (org-hide-emphasis-markers t)
 249     (org-fontify-whole-block-delimiter-line nil)
 250     (org-archive-default-command 'org-archive-to-archive-sibling)
 251     :bind
 252     ("C-c a" . org-agenda)
 253     (:map evil-normal-state-map ("ga" . org-archive-subtree-default)))
 254 #+end_src
 255 ** Tempo
 256 Define templates for lots of common structure elements. Mostly just used within this file.
 257 #+begin_src emacs-lisp
 258   (use-package org-tempo
 259     :after org
 260     :straight (:type built-in)
 261     :config
 262     (dolist (addition '(("el" . "src emacs-lisp")
 263                         ("el" . "src emacs-lisp")
 264                         ("sp" . "src conf :tangle ~/.spectrwm.conf")
 265                         ("ash" . "src shell :tangle ~/.config/ash/ashrc")
 266                         ("pi" . "src conf :tangle ~/.config/picom/picom.conf")
 267                         ("git" . "src conf :tangle ~/.gitconfig")
 268                         ("za" . "src conf :tangle ~/.config/zathura/zathurarc")
 269                         ("xr" . "src conf :tangle ~/.Xresources")
 270                         ("tm" . "src conf :tangle ~/.tmux.conf")
 271                         ("gp" . "src conf :tangle ~/.gnupg/gpg.conf")
 272                         ("ag" . "src conf :tangle ~/.gnupg/gpg-agent.conf")
 273                         ("xm" . "src conf :tangle ~/.config/xmodmap")))
 274       (add-to-list 'org-structure-template-alist addition)))
 275 #+end_src
 276 * Autocompletion
 277 ** Ivy
 278 A well balanced completion framework.
 279 #+begin_src emacs-lisp
 280   (use-package ivy
 281     :bind (:map ivy-minibuffer-map
 282            ("TAB" . ivy-alt-done))
 283            (:map ivy-switch-buffer-map
 284            ("M-d" . ivy-switch-buffer-kill))
 285     :config (ivy-mode))
 286 #+end_src
 287 ** Ivy-rich
 288 #+begin_src emacs-lisp
 289   (use-package ivy-rich
 290     :after (ivy counsel)
 291     :config (ivy-rich-mode))
 292 #+end_src
 293 ** Counsel
 294 Ivy everywhere.
 295 #+begin_src emacs-lisp
 296   (use-package counsel
 297     :bind ("C-M-j" . 'counsel-switch-buffer)
 298     :config (counsel-mode))
 299 #+end_src
 300 ** Remember frequent commands
 301 #+begin_src emacs-lisp
 302   (use-package ivy-prescient
 303     :after counsel
 304     :config
 305     (prescient-persist-mode)
 306     (ivy-prescient-mode))
 307 #+end_src
 308 * Emacs OS
 309 ** RSS
 310 Use elfeed for reading RSS. I have another file with all the feeds in it that I'd rather keep private.
 311 #+begin_src emacs-lisp
 312   (use-package elfeed
 313     :bind (("C-c e" . elfeed))
 314     :config (load "~/.emacs.d/feeds.el")
 315     :bind (:map elfeed-search-mode-map ("C-c C-o" . 'elfeed-show-visit)))
 316 #+end_src
 317 ** Email
 318 Use mu4e for reading emails.
 319 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.
 320 *** TODO Switch to mbsync
 321 =offlineimap= really crappy (slow and requires python2), and I need to replace it with =mbsync=.
 322 *** TODO Include mbsync/offlineimap config
 323 *** TODO Split up and document this config a bit
 324 *** Setup
 325 #+begin_src emacs-lisp
 326   (use-package smtpmail
 327     :straight (:type built-in))
 328   (use-package mu4e
 329     :load-path "/usr/share/emacs/site-lisp/mu4e"
 330     :straight (:build nil)
 331     :bind (("C-c m" . mu4e))
 332     :config
 333     (setq user-full-name "Armaan Bhojwani"
 334           smtpmail-local-domain "armaanb.net"
 335           smtpmail-stream-type 'ssl
 336           smtpmail-smtp-service '465
 337           mu4e-change-filenames-when-moving t
 338           mu4e-get-mail-command "offlineimap -q"
 339           message-citation-line-format "On %a %d %b %Y at %R, %f wrote:\n"
 340           message-citation-line-function 'message-insert-formatted-citation-line
 341           mu4e-completing-read-function 'ivy-completing-read
 342           mu4e-confirm-quit nil
 343           mu4e-view-use-gnus t
 344           mail-user-agent 'mu4e-user-agent
 345           mu4e-context-policy 'pick-first
 346           mu4e-contexts
 347           `( ,(make-mu4e-context
 348                :name "school"
 349                :enter-func (lambda () (mu4e-message "Entering school context"))
 350                :leave-func (lambda () (mu4e-message "Leaving school context"))
 351                :match-func (lambda (msg)
 352                              (when msg
 353                                (string-match-p "^/school" (mu4e-message-field msg :maildir))))
 354                :vars '((user-mail-address . "abhojwani22@nobles.edu")
 355                        (mu4e-sent-folder . "/school/Sent")
 356                        (mu4e-drafts-folder . "/school/Drafts")
 357                        (mu4e-trash-folder . "/school/Trash")
 358                        (mu4e-refile-folder . "/school/Archive")
 359                        (message-cite-reply-position . above)
 360                        (user-mail-address . "abhojwani22@nobles.edu")
 361                        (smtpmail-smtp-user . "abhojwani22@nobles.edu")
 362                        (smtpmail-smtp-server . "smtp.gmail.com")))
 363              ,(make-mu4e-context
 364                :name "personal"
 365                :enter-func (lambda () (mu4e-message "Entering personal context"))
 366                :leave-func (lambda () (mu4e-message "Leaving personal context"))
 367                :match-func (lambda (msg)
 368                              (when msg
 369                                (string-match-p "^/personal" (mu4e-message-field msg :maildir))))
 370                :vars '((mu4e-sent-folder . "/personal/Sent")
 371                        (mu4e-drafts-folder . "/personal/Drafts")
 372                        (mu4e-trash-folder . "/personal/Trash")
 373                        (mu4e-refile-folder . "/personal/Archive")
 374                        (user-mail-address . "me@armaanb.net")
 375                        (message-cite-reply-position . below)
 376                        (smtpmail-smtp-user . "me@armaanb.net")
 377                        (smtpmail-smtp-server . "smtp.mailbox.org")))))
 378     (add-to-list 'mu4e-bookmarks
 379                  '(:name "Unified inbox"
 380                          :query "maildir:\"/personal/INBOX\" or maildir:\"/school/INBOX\""
 381                          :key ?b))
 382     :hook ((mu4e-compose-mode . flyspell-mode)
 383            (message-send-hook . (lambda () (unless (yes-or-no-p "Ya sure 'bout that?")
 384                                              (signal 'quit nil))))))
 385 #+end_src
 386 *** Discourage Gnus from displaying HTML emails
 387 #+begin_src emacs-lisp
 388   (with-eval-after-load "mm-decode"
 389     (add-to-list 'mm-discouraged-alternatives "text/html")
 390     (add-to-list 'mm-discouraged-alternatives "text/richtext"))
 391 #+end_src
 392 ** Default browser
 393 Set EWW as default browser except for multimedia which should open in MPV.
 394 #+begin_src emacs-lisp
 395   (defun browse-url-mpv (url &optional new-window)
 396     "Ask MPV to load URL."
 397     (interactive)
 398     (start-process "mpv" "*mpv*" "mpv" url))
 399
 400   (setq browse-url-handlers
 401         (quote
 402          (("youtu\\.?be" . browse-url-mpv)
 403           ("peertube.*" . browse-url-mpv)
 404           ("vid.*" . browse-url-mpv)
 405           ("vid.*" . browse-url-mpv)
 406           ("*.mp4" . browse-url-mpv)
 407           ("*.mp3" . browse-url-mpv)
 408           ("*.ogg" . browse-url-mpv)
 409           ("." . eww-browse-url)
 410           )))
 411 #+end_src
 412 ** EWW
 413 Some EWW enhancements.
 414 *** Give buffer a useful name
 415 #+begin_src emacs-lisp
 416   ;; From https://protesilaos.com/dotemacs/
 417   (defun prot-eww--rename-buffer ()
 418     "Rename EWW buffer using page title or URL.
 419         To be used by `eww-after-render-hook'."
 420     (let ((name (if (eq "" (plist-get eww-data :title))
 421                     (plist-get eww-data :url)
 422                   (plist-get eww-data :title))))
 423       (rename-buffer (format "*%s # eww*" name) t)))
 424
 425   (use-package eww
 426     :straight (:type built-in)
 427     :bind (("C-c w" . eww))
 428     :hook (eww-after-render-hook prot-eww--rename-buffer))
 429 #+end_src
 430 *** Keybinding
 431 #+begin_src emacs-lisp
 432   (global-set-key (kbd "C-c w") 'eww)
 433 #+end_src
 434 ** IRC
 435 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.
 436 #+begin_src emacs-lisp
 437   (defun fetch-password (&rest params)
 438     (require 'auth-source)
 439     (let ((match (car (apply 'auth-source-search params))))
 440       (if match
 441           (let ((secret (plist-get match :secret)))
 442             (if (functionp secret)
 443                 (funcall secret)
 444               secret))
 445         (error "Password not found for %S" params))))
 446
 447   (use-package circe
 448     :config
 449     (enable-lui-track)
 450     (enable-circe-color-nicks)
 451     (setq circe-network-defaults '(("libera"
 452                                     :host "irc.armaanb.net"
 453                                     :nick "emacs"
 454                                     :user "emacs"
 455                                     :use-tls t
 456                                     :port 6698
 457                                     :pass (lambda (null) (fetch-password
 458                                                           :login "emacs"
 459                                                           :machine "irc.armaanb.net"
 460                                                           :port 6698)))
 461                                    ("oftc"
 462                                     :host "irc.armaanb.net"
 463                                     :nick "emacs"
 464                                     :user "emacs"
 465                                     :use-tls t
 466                                     :port 6699
 467                                     :pass (lambda (null) (fetch-password
 468                                                           :login "emacs"
 469                                                           :machine "irc.armaanb.net"
 470                                                           :port 6699)))
 471                                    ("tilde"
 472                                     :host "irc.armaanb.net"
 473                                     :nick "emacs"
 474                                     :user "emacs"
 475                                     :use-tls t
 476                                     :port 6696
 477                                     :pass (lambda (null) (fetch-password
 478                                                           :login "emacs"
 479                                                           :machine "irc.armaanb.net"
 480                                                           :port 6696)))))
 481     :custom (circe-default-part-message "goodbye!")
 482     :bind (:map circe-mode-map ("C-c C-r" . circe-reconnect-all)))
 483
 484   (defun acheam-irc ()
 485     "Open circe"
 486     (interactive)
 487     (if (get-buffer "irc.armaanb.net:6696")
 488         (switch-to-buffer "irc.armaanb.net:6696")
 489       (progn (switch-to-buffer "*scratch*")
 490              (circe "libera")
 491              (circe "oftc")
 492              (circe "tilde"))))
 493
 494   (global-set-key (kbd "C-c i") 'acheam-irc)
 495 #+end_src
 496 ** Calendar
 497 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.
 498 #+begin_src emacs-lisp
 499   (defun sync-calendar ()
 500     "Sync calendars with vdirsyncer"
 501     (interactive)
 502     (async-shell-command "vdirsyncer sync"))
 503
 504   (use-package calfw
 505     :bind (:map cfw:calendar-mode-map ("C-S-u" . sync-calendar)))
 506   (use-package calfw-ical)
 507   (use-package calfw-org)
 508
 509   (defun acheam-calendar ()
 510     "Open calendars"
 511     (interactive)
 512     (cfw:open-calendar-buffer
 513      :contents-sources (list
 514                         (cfw:org-create-source "Green")
 515                         (cfw:ical-create-source
 516                          "Personal"
 517                          "~/.local/share/vdirsyncer/mailbox/Y2FsOi8vMC8zMQ.ics"
 518                          "Gray")
 519                         (cfw:ical-create-source
 520                          "Personal"
 521                          "~/.local/share/vdirsyncer/mailbox/Y2FsOi8vMC8zMQ.ics"
 522                          "Red")
 523                         (cfw:ical-create-source
 524                          "School"
 525                          "~/.local/share/vdirsyncer/school/abhojwani22@nobles.edu.ics"
 526                          "Cyan"))
 527      :view 'week))
 528
 529   (global-set-key (kbd "C-c c") 'acheam-calendar)
 530 #+end_src
 531 ** PDF reader
 532 #+begin_src emacs-lisp
 533   (use-package pdf-tools
 534     :hook (pdf-view-mode . pdf-view-midnight-minor-mode))
 535 #+end_src
 536 * Emacs IDE
 537 ** Python formatting
 538 #+begin_src emacs-lisp
 539   (use-package blacken
 540     :hook (python-mode . blacken-mode)
 541     :custom (blacken-line-length 79))
 542
 543 #+end_src
 544 ** Strip trailing whitespace
 545 #+begin_src emacs-lisp
 546   (use-package ws-butler
 547     :config (ws-butler-global-mode))
 548 #+end_src
 549 ** Flycheck
 550 Automatic linting. I need to look into configuring this more.
 551 #+begin_src emacs-lisp
 552   (use-package flycheck
 553     :config (global-flycheck-mode))
 554 #+end_src
 555 ** Project management
 556 I never use this, but apparently its very powerful. Another item on my todo list.
 557 #+begin_src emacs-lisp
 558   (use-package projectile
 559     :config (projectile-mode)
 560     :custom ((projectile-completion-system 'ivy))
 561     :bind-keymap ("C-c p" . projectile-command-map)
 562     :init (setq projectile-switch-project-action #'projectile-dired))
 563
 564   (use-package counsel-projectile
 565     :after projectile
 566     :config (counsel-projectile-mode))
 567 #+end_src
 568 ** Dired
 569 The best file manager!
 570 #+begin_src emacs-lisp
 571   (use-package dired
 572     :straight (:type built-in)
 573     :commands (dired dired-jump)
 574     :custom ((dired-listing-switches "-agho --group-directories-first"))
 575     :config (evil-collection-define-key 'normal 'dired-mode-map
 576               "h" 'dired-single-up-directory
 577               "l" 'dired-single-buffer))
 578
 579   (use-package dired-single
 580     :commands (dired dired-jump))
 581
 582   (use-package dired-open
 583     :commands (dired dired-jump)
 584     :custom (dired-open-extensions '(("png" . "feh")
 585                                      ("mkv" . "mpv"))))
 586
 587   (use-package dired-hide-dotfiles
 588     :hook (dired-mode . dired-hide-dotfiles-mode)
 589     :config
 590     (evil-collection-define-key 'normal 'dired-mode-map
 591       "H" 'dired-hide-dotfiles-mode))
 592 #+end_src
 593 ** Git
 594 *** Magit
 595 A very good Git interface.
 596 #+begin_src emacs-lisp
 597   (use-package magit)
 598 #+end_src
 599 *** Email
 600 #+begin_src emacs-lisp
 601   (use-package piem)
 602   (use-package git-email
 603     :straight (git-email :repo "https://git.sr.ht/~yoctocell/git-email")
 604     :config (git-email-piem-mode))
 605 #+end_src
 606 ** C
 607 Modified from https://eklitzke.org/smarter-emacs-clang-format.
 608
 609 Style is basically ddevault's style guide but with 4 spaces instead of 8 char tabs.
 610 #+begin_src emacs-lisp
 611   (use-package clang-format
 612     :custom (clang-format-style "{
 613         BasedOnStyle: llvm,
 614         AlwaysBreakAfterReturnType: AllDefinitions,
 615         IndentWidth: 4,
 616         }"))
 617
 618   (defun clang-format-buffer-smart ()
 619     "Reformat buffer if .clang-format exists in the projectile root."
 620     (when (file-exists-p (expand-file-name ".clang-format" (projectile-project-root)))
 621       (when (if (eq major-mode 'c-mode))
 622         (message "Formatting with clang-format...")
 623         (clang-format-buffer))))
 624
 625   (add-hook 'before-save-hook 'clang-format-buffer-smart nil)
 626 #+end_src
 627 * General text editing
 628 ** Spell checking
 629 Spell check in text mode, and in prog-mode comments.
 630 #+begin_src emacs-lisp
 631   (dolist (hook '(text-mode-hook
 632                   markdown-mode-hook
 633                   scdoc-mode-hook))
 634     (add-hook hook (lambda () (flyspell-mode))))
 635   (dolist (hook '(change-log-mode-hook log-edit-mode-hook))
 636     (add-hook hook (lambda () (flyspell-mode -1))))
 637   (add-hook 'prog-mode (lambda () (flyspell-prog mode)))
 638   (setq ispell-silently-savep t)
 639 #+end_src
 640 ** Sane tab width
 641 #+begin_src emacs-lisp
 642   (setq-default tab-width 2)
 643 #+end_src
 644 ** Save place
 645 Opens file where you left it.
 646 #+begin_src emacs-lisp
 647   (save-place-mode)
 648 #+end_src
 649 ** Writing mode
 650 Distraction free writing a la junegunn/goyo.
 651 #+begin_src emacs-lisp
 652   (use-package olivetti
 653     :bind ("C-c o" . olivetti-mode))
 654 #+end_src
 655 ** Abbreviations
 656 Abbreviate things! I just use this for things like my email address and copyright notice.
 657 #+begin_src emacs-lisp
 658   (setq abbrev-file-name "~/.emacs.d/abbrevs.el")
 659   (setq save-abbrevs 'silent)
 660   (setq-default abbrev-mode t)
 661 #+end_src
 662 ** TRAMP
 663 #+begin_src emacs-lisp
 664   (setq tramp-default-method "ssh")
 665 #+end_src
 666 ** Follow version controlled symlinks
 667 #+begin_src emacs-lisp
 668   (setq vc-follow-symlinks t)
 669 #+end_src
 670 ** Open file as root
 671 #+begin_src emacs-lisp
 672   (defun doas-edit (&optional arg)
 673     "Edit currently visited file as root.
 674
 675     With a prefix ARG prompt for a file to visit.
 676     Will also prompt for a file to visit if current
 677     buffer is not visiting a file.
 678
 679     Modified from Emacs Redux."
 680     (interactive "P")
 681     (if (or arg (not buffer-file-name))
 682         (find-file (concat "/doas:root@localhost:"
 683                            (ido-read-file-name "Find file(as root): ")))
 684       (find-alternate-file (concat "/doas:root@localhost:" buffer-file-name))))
 685
 686     (global-set-key (kbd "C-x C-r") #'doas-edit)
 687 #+end_src
 688 ** Markdown mode
 689 #+begin_src emacs-lisp
 690   (use-package markdown-mode)
 691 #+end_src
 692 ** scdoc mode
 693 Get it for yourself at https://git.armaanb.net/scdoc
 694 #+begin_src emacs-lisp
 695   (add-to-list 'load-path "~/src/scdoc-mode")
 696   (autoload 'scdoc-mode "scdoc-mode" "Major mode for editing scdoc files" t)
 697   (add-to-list 'auto-mode-alist '("\\.scd\\'" . scdoc-mode))
 698 #+end_src
 699 * Keybindings
 700 ** Switch windows
 701 #+begin_src emacs-lisp
 702   (use-package ace-window
 703     :bind ("M-o" . ace-window))
 704 #+end_src
 705 ** Kill current buffer
 706 Makes "C-x k" binding faster.
 707 #+begin_src emacs-lisp
 708   (substitute-key-definition 'kill-buffer 'kill-buffer-and-window global-map)
 709 #+end_src
 710 * Other settings
 711 ** OpenSCAD syntax
 712 #+begin_src emacs-lisp
 713   (use-package scad-mode)
 714 #+end_src
 715 ** Control backup and lock files
 716 Stop backup files from spewing everywhere.
 717 #+begin_src emacs-lisp
 718   (setq backup-directory-alist `(("." . "~/.emacs.d/backups"))
 719         create-lockfiles nil)
 720 #+end_src
 721 ** Make yes/no easier
 722 #+begin_src emacs-lisp
 723   (defalias 'yes-or-no-p 'y-or-n-p)
 724 #+end_src
 725 ** Move customize file
 726 No more clogging up init.el.
 727 #+begin_src emacs-lisp
 728   (setq custom-file "~/.emacs.d/custom.el")
 729   (load custom-file)
 730 #+end_src
 731 ** Better help
 732 #+begin_src emacs-lisp
 733   (use-package helpful
 734     :commands (helpful-callable helpful-variable helpful-command helpful-key)
 735     :custom
 736     (counsel-describe-function-function #'helpful-callable)
 737     (counsel-describe-variable-function #'helpful-variable)
 738     :bind
 739     ([remap describe-function] . counsel-describe-function)
 740     ([remap describe-command] . helpful-command)
 741     ([remap describe-variable] . counsel-describe-variable)
 742     ([remap describe-key] . helpful-key))
 743 #+end_src
 744 ** GPG
 745 #+begin_src emacs-lisp
 746   (use-package epa-file
 747     :straight (:type built-in)
 748     :custom
 749     (epa-file-select-keys nil)
 750     (epa-file-encrypt-to '("me@armaanb.net"))
 751     (password-cache-expiry (* 60 15)))
 752
 753   (use-package pinentry
 754     :config (pinentry-start))
 755 #+end_src
 756 ** Pastebin
 757 #+begin_src emacs-lisp
 758   (use-package 0x0
 759     :straight (0x0 :type git :repo "https://git.sr.ht/~zge/nullpointer-emacs")
 760     :custom (0x0-default-service 'envs))
 761 #+end_src
 762 *** TODO Replace this with uploading to my own server
 763 Similar to the ufile alias in my ashrc
 764 ** Automatically clean buffers
 765 Automatically close unused buffers (except those of Circe) at midnight.
 766 #+begin_src emacs-lisp
 767   (midnight-mode)
 768   (add-to-list 'clean-buffer-list-kill-never-regexps (lambda (buffer-name)
 769                                                        (with-current-buffer buffer-name
 770                                                          (derived-mode-p 'lui-mode))))
 771 #+end_src
 772 * Tangles
 773 ** Spectrwm
 774 Spectrwm is a really awesome window manager! Would highly recommend.
 775 *** General settings
 776 #+begin_src conf :tangle ~/.spectrwm.conf
 777   workspace_limit = 5
 778   warp_pointer = 1
 779   modkey = Mod4
 780   autorun = ws[1]:/home/armaa/src/bin/autostart
 781 #+end_src
 782 *** Bar
 783 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.
 784 #+begin_src conf :tangle ~/.spectrwm.conf
 785   bar_enabled = 0
 786   bar_font = xos4 JetBrains Mono:pixelsize=14:antialias=true # any installed font
 787 #+end_src
 788 *** Keybindings
 789 I'm not a huge fan of how spectrwm handles keybindings, probably my biggest gripe with it.
 790 **** WM actions
 791 #+begin_src conf :tangle ~/.spectrwm.conf
 792   program[term] = st -e tmux
 793   program[notif] = /home/armaa/src/bin/setter status
 794   program[pass] = /home/armaa/src/bin/passmenu
 795   program[lock] = slock
 796
 797   bind[notif] = MOD+n
 798   bind[pass] = MOD+Shift+p
 799 #+end_src
 800 **** Media keys
 801 #+begin_src conf :tangle ~/.spectrwm.conf
 802   program[paup] = /home/armaa/src/bin/setter audio +5
 803   program[padown] = /home/armaa/src/bin/setter audio -5
 804   program[pamute] = /home/armaa/src/bin/setter audio
 805   program[brigup] = /home/armaa/src/bin/setter brightness +10%
 806   program[brigdown] = /home/armaa/src/bin/setter brightness 10%-
 807
 808   bind[padown] = XF86AudioLowerVolume
 809   bind[paup] = XF86AudioRaiseVolume
 810   bind[pamute] = XF86AudioMute
 811   bind[brigdown] = XF86MonBrightnessDown
 812   bind[brigup] = XF86MonBrightnessUp
 813 #+end_src
 814 **** HJKL
 815 #+begin_src conf :tangle ~/.spectrwm.conf
 816   program[h] = xdotool keyup h key --clearmodifiers Left
 817   program[j] = xdotool keyup j key --clearmodifiers Down
 818   program[k] = xdotool keyup k key --clearmodifiers Up
 819   program[l] = xdotool keyup l key --clearmodifiers Right
 820
 821   bind[h] = MOD + Control + h
 822   bind[j] = MOD + Control + j
 823   bind[k] = MOD + Control + k
 824   bind[l] = MOD + Control + l
 825 #+end_src
 826 **** Programs
 827 #+begin_src conf :tangle ~/.spectrwm.conf
 828   program[email] = emacsclient -ce '(progn (switch-to-buffer "*scratch*") (mu4e))'
 829   program[irc] = emacsclient -ce '(acheam-irc)'
 830   program[rss] = emacsclient -ce '(elfeed)'
 831   program[calendar] = emacsclient -ce '(acheam-calendar)'
 832   program[calc] = emacsclient -ce '(progn (calc) (windmove-up) (delete-window))'
 833   program[emacs] = emacsclient -c
 834   program[bookmarks] = /home/armaa/src/bin/bookmarks
 835   program[browser] = chorizo
 836
 837   bind[email] = MOD+Control+1
 838   bind[irc] = MOD+Control+2
 839   bind[rss] = MOD+Control+3
 840   bind[calendar] = MOD+Control+4
 841   bind[calc] = MOD+Control+5
 842   bind[emacs] = MOD+Control+Return
 843   bind[bookmarks] = MOD+Control+o
 844   bind[browser] = MOD+Control+p
 845 #+end_src
 846 *** Quirks
 847 Float some specific programs by default.
 848 #+begin_src conf :tangle ~/.spectrwm.conf
 849   quirk[Castle Menu] = FLOAT
 850   quirk[momen] = FLOAT
 851   quirk[pinentry-fltk] = FLOAT
 852 #+end_src
 853 ** Ash
 854 *** Options
 855 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.
 856 #+begin_src conf :tangle ~/.config/ash/ashrc
 857   set -o vi
 858 #+end_src
 859 *** Functions
 860 **** Finger
 861 #+begin_src shell :tangle ~/.config/ash/ashrc
 862   finger() {
 863       user=$(echo "$1" | cut -f 1 -d '@')
 864       host=$(echo "$1" | cut -f 2 -d '@')
 865       echo $user | nc "$host" 79
 866   }
 867 #+end_src
 868 **** Upload to ftp.armaanb.net
 869 #+begin_src shell :tangle ~/.config/ash/ashrc
 870   _uprint() {
 871       echo "https://l.armaanb.net/$(basename "$1")" | tee /dev/tty | xclip -sel c
 872   }
 873
 874   _uup() {
 875       rsync "$1" "armaa@armaanb.net:/srv/ftp/pub/$2" --chmod 644 --progress
 876   }
 877
 878   ufile() {
 879       _uup "$1" "$2"
 880       _uprint "$1"
 881   }
 882
 883   uclip() {
 884       tmp=$(mktemp)
 885       xclip -o -sel c >> "$tmp"
 886       basetmp=$(echo "$tmp" | tail -c +5)
 887       _uup "$tmp" "$basetmp"
 888       _uprint "$basetmp"
 889       rm -f "$tmp"
 890   }
 891 #+end_src
 892 *** Exports
 893 #+begin_src shell :tangle ~/.config/ash/ashrc
 894   export EDITOR="emacsclient -c"
 895   export VISUAL="$EDITOR"
 896   export TERM=xterm-256color # for compatability
 897
 898   export GPG_TTY="$(tty)"
 899   export MANPAGER='nvim +Man!'
 900   export PAGER='less'
 901   export GTK_USE_PORTAL=1
 902   export CDPATH=:~
 903
 904   export PATH="/home/armaa/.local/bin:$PATH" # prioritize .local/bin
 905   export PATH="/home/armaa/src/bin:$PATH" # prioritize my bin
 906   export PATH="//home/armaa/src/bin/bin:$PATH" # prioritize my bins
 907   export PATH="$PATH:/usr/sbin"
 908
 909   export LC_ALL="en_US.UTF-8"
 910   export LC_CTYPE="en_US.UTF-8"
 911   export LANGUAGE="en_US.UTF-8"
 912   export TZ="America/New_York"
 913
 914   export KISS_PATH=""
 915   export KISS_PATH="$KISS_PATH:$HOME/repos/personal"
 916   export KISS_PATH="$KISS_PATH:$HOME/repos/bin/bin"
 917   export KISS_PATH="$KISS_PATH:$HOME/repos/main/core"
 918   export KISS_PATH="$KISS_PATH:$HOME/repos/main/extra"
 919   export KISS_PATH="$KISS_PATH:$HOME/repos/main/xorg"
 920   export KISS_PATH="$KISS_PATH:$HOME/repos/community/community"
 921   export KISS_PATH="$KISS_PATH:$HOME/repos/mid/ports"
 922
 923   export CFLAGS="-O3 -pipe -march=native"
 924   export CXXFLAGS="$CFLAGS"
 925   export MAKEFLAGS="-j$(nproc)"
 926   export PKG_CONFIG_PATH="$PKG_CONFIG_PATH:/usr/local/lib/pkgconfig"
 927
 928   export XDG_DESKTOP_DIR="/dev/null"
 929   export XDG_DOCUMENTS_DIR="$HOME/documents"
 930   export XDG_DOWNLOAD_DIR="$HOME/downloads"
 931   export XDG_MUSIC_DIR="$HOME/music"
 932   export XDG_PICTURES_DIR="$HOME/pictures"
 933   export XDG_VIDEOS_DIR="$HOME/videos"
 934 #+end_src
 935 *** Aliases
 936 **** SSH
 937 #+begin_src shell :tangle ~/.config/ash/ashrc
 938   alias poki='ssh armaanb.net'
 939   alias irc='ssh root@armaanb.net -t abduco -A irc catgirl freenode'
 940   alias union='ssh 192.168.1.18'
 941   alias mine='ssh -p 23 root@pickupserver.cc'
 942   alias tcf='ssh root@204.48.23.68'
 943   alias ngmun='ssh root@157.245.89.25'
 944   alias prox='ssh root@192.168.1.224'
 945   alias ncq='ssh root@143.198.123.17'
 946   alias envs='ssh acheam@envs.net'
 947 #+end_src
 948 **** File management
 949 #+begin_src shell :tangle ~/.config/ash/ashrc
 950   alias ls='LC_COLLATE=C ls -lh --group-directories-first'
 951   alias la='ls -A'
 952   alias df='df -h / /boot'
 953   alias du='du -h'
 954   alias free='free -m'
 955   alias cp='cp -riv'
 956   alias rm='rm -iv'
 957   alias mv='mv -iv'
 958   alias ln='ln -v'
 959   alias grep='grep -in'
 960   alias mkdir='mkdir -pv'
 961   alias lanex='java -jar ~/.local/share/lxc/lanxchange.jar && rm lxc*'
 962   emacs() { $EDITOR "$@" & }
 963   alias vim="emacs"
 964 #+end_src
 965 **** System management
 966 #+begin_src shell :tangle ~/.config/ash/ashrc
 967   alias crontab='crontab-argh'
 968   alias sudo='doas'
 969   alias pasu='git -C ~/.password-store push'
 970   alias yadu='yadm add -u && yadm commit -m "Updated `date -Iseconds`" && \
 971     yadm push'
 972 #+end_src
 973 **** Networking
 974 #+begin_src shell :tangle ~/.config/ash/ashrc
 975   alias ping='ping -c 10'
 976   alias gps='gpg --keyserver keyserver.ubuntu.com --search-keys'
 977   alias gpp='gpg --keyserver keyserver.ubuntu.com --recv-key'
 978   alias plan='T=$(mktemp) && \
 979           rsync armaanb.net:/home/armaa/plan.txt "$T" && \
 980           TT=$(mktemp) && \
 981           head -n -2 $T > $TT && \
 982           /bin/nvim $TT && \
 983           echo >> "$TT" && \
 984           echo "Last updated: $(date -R)" >> "$TT" && \
 985           fold -sw 72 "$TT" > "$T"| \
 986           rsync "$T" armaanb.net:/home/armaa/plan.txt && \
 987           rm -f "$T"'
 988 #+end_src
 989 **** Virtual machines, chroots
 990 #+begin_src shell :tangle ~/.config/ash/ashrc
 991   alias ckiss="doas chrooter ~/Virtual/kiss"
 992   alias cdebian="doas chrooter ~/Virtual/debian bash"
 993   alias cwindows='devour qemu-system-x86_64 \
 994     -smp 3 \
 995     -cpu host \
 996     -enable-kvm \
 997     -m 3G \
 998     -device VGA,vgamem_mb=64 \
 999     -device intel-hda \
1000     -device hda-duplex \
1001     -net nic \
1002     -net user,smb=/home/armaa/Public \
1003     -drive format=qcow2,file=/home/armaa/Virtual/windows.qcow2'
1004 #+end_src
1005 **** Latin
1006 #+begin_src shell :tangle ~/.config/ash/ashrc
1007   alias words='gen-shell -c "words"'
1008   alias words-e='gen-shell -c "words ~E"'
1009 #+end_src
1010 **** Other
1011 #+begin_src shell :tangle ~/.config/ash/ashrc
1012   alias bigrandomfile='dd if=/dev/urandom of=1GB-urandom bs=1M count=1024 \
1013     iflag=fullblock'
1014   alias bigboringfile='dd if=/dev/zero of=1GB-zero bs=1M count=1024 \
1015     iflag=fullblock'
1016   alias ytmusic="youtube-dl -x --add-metadata  --audio-format aac \
1017     --restrict-filenames -o '%(title)s.%(ext)s'"
1018   alias bc='bc -l'
1019 #+end_src
1020 ** MPV
1021 Make MPV play a little bit smoother.
1022 #+begin_src conf :tangle ~/.config/mpv/mpv.conf
1023   ytdl-format="bestvideo[height<=?1080]+bestaudio/best"
1024   hwdec=auto-copy
1025 #+end_src
1026 ** Inputrc
1027 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!.
1028 #+begin_src conf :tangle ~/.inputrc
1029   set editing-mode emacs
1030 #+end_src
1031 ** Git
1032 *** User
1033 #+begin_src conf :tangle ~/.gitconfig
1034   [user]
1035   name = Armaan Bhojwani
1036   email = me@armaanb.net
1037   signingkey = 0FEB9471E19C49C60CFBEB133C9ED82FFE788E4A
1038 #+end_src
1039 *** Init
1040 #+begin_src conf :tangle ~/.gitconfig
1041   [init]
1042   defaultBranch = main
1043 #+end_src
1044 *** GPG
1045 #+begin_src conf :tangle ~/.gitconfig
1046   [gpg]
1047   program = gpg
1048 #+end_src
1049 *** Sendemail
1050 #+begin_src conf :tangle ~/.gitconfig
1051   [sendemail]
1052   smtpserver = smtp.mailbox.org
1053   smtpuser = me@armaanb.net
1054   smtpencryption = ssl
1055   smtpserverport = 465
1056   confirm = auto
1057 #+end_src
1058 *** Submodule
1059 #+begin_src conf :tangle ~/.gitconfig
1060   [submodule]
1061   recurse = true
1062 #+end_src
1063 *** Aliases
1064 #+begin_src conf :tangle ~/.gitconfig
1065   [alias]
1066   stat = diff --stat
1067   sclone = clone --depth 1
1068   sclean = clean -dfX
1069   a = add
1070   aa = add .
1071   c = commit
1072   quickfix = commit . --amend --no-edit
1073   p = push
1074   subup = submodule update --remote
1075   loc = diff --stat 4b825dc642cb6eb9a060e54bf8d69288fbee4904 # Empty hash
1076   pushnc = push -o skip-ci
1077 #+end_src
1078 *** Commit
1079 #+begin_src conf :tangle ~/.gitconfig
1080   [commit]
1081   gpgsign = true
1082   verbose = true
1083 #+end_src
1084 *** Tag
1085 #+begin_src conf :tangle ~/.gitconfig
1086   [tag]
1087   gpgsign = true
1088 #+end_src
1089 ** Zathura
1090 The best document reader!
1091 *** Options
1092 #+begin_src conf :tangle ~/.config/zathura/zathurarc
1093   map <C-i> recolor
1094   map <A-b> toggle_statusbar
1095   set selection-clipboard clipboard
1096   set scroll-step 200
1097
1098   set window-title-basename "true"
1099   set selection-clipboard "clipboard"
1100 #+end_src
1101 *** Colors
1102 #+begin_src conf :tangle ~/.config/zathura/zathurarc
1103   set default-bg         "#000000"
1104   set default-fg         "#ffffff"
1105   set render-loading     true
1106   set render-loading-bg  "#000000"
1107   set render-loading-fg  "#ffffff"
1108
1109   set recolor-lightcolor "#000000" # bg
1110   set recolor-darkcolor  "#ffffff" # fg
1111   set recolor            "true"
1112 #+end_src
1113 ** Xresources
1114 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.
1115 #+begin_src conf :tangle ~/.Xresources
1116   ! special
1117   ,*.foreground:   #ffffff
1118   ,*.background:   #000000
1119   ,*.cursorColor:  #ffffff
1120
1121   ! black
1122   ,*.color0:       #000000
1123   ,*.color8:       #555555
1124
1125   ! red
1126   ,*.color1:       #ff8059
1127   ,*.color9:       #ffa0a0
1128
1129   ! green
1130   ,*.color2:       #00fc50
1131   ,*.color10:      #88cf88
1132
1133   ! yellow
1134   ,*.color3:       #eecc00
1135   ,*.color11:      #d2b580
1136
1137   ! blue
1138   ,*.color4:       #29aeff
1139   ,*.color12:      #92baff
1140
1141   ! magenta
1142   ,*.color5:       #feacd0
1143   ,*.color13:      #e0b2d6
1144
1145   ! cyan
1146   ,*.color6:       #00d3d0
1147   ,*.color14:      #a0bfdf
1148
1149   ! white
1150   ,*.color7:       #eeeeee
1151   ,*.color15:      #dddddd
1152 #+end_src
1153 ** Tmux
1154 I use tmux in order to keep my st build light. Still learning how it works.
1155 #+begin_src conf :tangle ~/.tmux.conf
1156   set -g status off
1157   set -g mouse on
1158   set-option -g history-limit 50000
1159   set-window-option -g mode-keys vi
1160   bind-key -T copy-mode-vi 'v' send -X begin-selection
1161   bind -T copy-mode-vi y send-keys -X copy-pipe-and-cancel 'xclip -in -selection clipboard'
1162 #+end_src
1163 ** GPG
1164 *** Config
1165 #+begin_src conf :tangle ~/.gnupg/gpg.conf
1166   default-key 3C9ED82FFE788E4A
1167   use-agent
1168 #+end_src
1169 *** Agent
1170 #+begin_src conf :tangle ~/.gnupg/gpg-agent.conf
1171   pinentry-program /sbin/pinentry
1172   max-cache-ttl 600
1173   default-cache-ttl 600
1174   allow-emacs-pinentry
1175 #+end_src
1176 ** Xmodmap
1177 #+begin_src conf (if (eq system-name "frost.armaanb.net") ":tangle ~/.config/xmodmap")
1178   ! Unmap left super
1179   clear mod4
1180
1181   ! Turn right alt into super
1182   remove mod1 = Alt_R
1183   add mod4 = Alt_R
1184
1185   ! Swap caps and control
1186   remove Lock = Caps_Lock
1187   remove Control = Control_L
1188   remove Lock = Control_L
1189   remove Control = Caps_Lock
1190   keysym Control_L = Caps_Lock
1191   keysym Caps_Lock = Control_L
1192   add Lock = Caps_Lock
1193   add Control = Control_L
1194 #+end_src