* 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 Emacs 28 with native compilation, 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.
+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 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 [[*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. 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.
-** TODOs
-*** TODO Turn keybinding and hook declarations into use-package declarations where possible
-*** TODO Include offlineimap config
** 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 near their contributions.
* Package management
-** Emacs 28 fix
-This is temporary until some stuff gets fixed upstream
-#+begin_src emacs-lisp
- (setq straight-repository-branch "develop")
- (setq straight-disable-native-compile t)
-#+end_src
** 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))
** Theme
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
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
"[||]" "[<" "[|" "{|" "?." "?=" "?:" "##" "###" "####" "#["
"#{" "#=" "#!" "#:" "#_(" "#_" "#?" "#(" ";;" "_|_" "__" "~~"
"~~>" "~>" "~-" "~@" "$>" "^=" "]#"))
- (global-ligature-mode t))
+ ;; (global-ligature-mode t))
+ )
#+end_src
** Line numbers
Display relative line numbers except in certain modes.
(use-package minions
:config (minions-mode))
#+end_src
-** Ruler
-Show a ruler at a certain number of chars depending on mode.
+** Whitespace mode
+Highlight whitespace and other bad text practices.
#+begin_src emacs-lisp
- (setq display-fill-column-indicator-column 80)
- (global-display-fill-column-indicator-mode)
-#+end_src
-** Keybinding hints
-When starting a key chord, show possible future steps after 0.3 seconds.
-#+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 todo items in comments
#+begin_src emacs-lisp
(blink-cursor-mode)
#+end_src
** Visual line mode
-Soft wrap words and do operations by visual lines except in programming modes.
+Soft wrap words and do operations by visual lines in some modes.
+#+begin_src emacs-lisp
+ (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
- (visual-line-mode 1)
- (add-hook 'prog-mode-hook 'visual-line-mode 0)
+ (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
Invert modeline color instead of audible bell or the standard visual bell.
#+begin_src emacs-lisp
(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)
+ (setq-default frame-title-format '("%b [%m]"))
+#+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.
** 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 bindings.
: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)
(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.
: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
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
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
* Emacs OS
** RSS
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))
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"
(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 which should open in MPV.
+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
("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
:pass (lambda (null) (fetch-password
:login "emacs"
:machine "irc.armaanb.net"
- :port 6696)))
- (circe "libera")
- (circe "oftc")
- (circe "tilde")))
+ :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.
(defun sync-calendar ()
"Sync calendars with vdirsyncer"
(interactive)
- (shell-command "vdirsyncer -vcritical sync"))
+ (async-shell-command "vdirsyncer sync"))
(use-package calfw
:bind (:map cfw:calendar-mode-map ("C-S-u" . sync-calendar)))
(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
** Python formatting
#+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
#+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)
*** 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
-* General text editing
-** Indentation
-Automatically indent after every change. I'm not sure how much I like this. It slows down the editor and code sometimes ends up in a half-indented state meaning I have to manually reformat using "==" anyways.
-#+begin_src emacs-lisp
- (use-package aggressive-indent
- :config (global-aggressive-indent-mode))
+** 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
** 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))))
(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
:straight (0x0 :type git :repo "https://git.sr.ht/~zge/nullpointer-emacs")
: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
- (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
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.
**** 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
#+end_src
**** Programs
#+begin_src conf :tangle ~/.spectrwm.conf
- program[email] = emacsclient -ce "(mu4e)"
- program[irc] = emacsclient -ce '(switch-to-buffer "irc.armaanb.net:6698")'
+ 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[firefox] = firefox
program[emacs] = emacsclient -c
+ 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[calendar] = MOD+Control+4
bind[calc] = MOD+Control+5
- bind[firefox] = MOD+Control+0
bind[emacs] = MOD+Control+Return
+ bind[bookmarks] = MOD+Control+o
+ bind[browser] = MOD+Control+p
#+end_src
*** 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
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() {
#+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'
#+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
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 && \
- /bin/nvim $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 \
-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
gpgsign = true
verbose = true
#+end_src
-** Dunst
-Lightweight notification daemon. Eventually I'd like to replace this with something dbus-less.
-*** 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!
set recolor-darkcolor "#ffffff" # fg
set recolor "true"
#+end_src
-** Firefox
-Just some basic Firefox CSS. Will probably have to rewrite for the Proton redesign.
-*** 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. 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
#+begin_src conf :tangle ~/.tmux.conf
set -g status off
set -g mouse on
+
set-option -g history-limit 50000
+
+ set -g set-titles on
+ set -g set-titles-string "#W"
+
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'
#+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
+** sx
+#+begin_src shell :tangle ~/.config/sx/sxrc :tangle-mode (identity #o755)
+ autostart &
+ dwmsetroot &
+ exec dwm
+#+end_src