1 #+TITLE: System Configuration
2 #+DESCRIPTION: Armaan's system configuration.
5 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!
7 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.
9 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.
11 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.
13 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.
15 *** TODO Turn keybinding and hook declarations into use-package declarations where possible
16 *** TODO Put configs with passwords in here with some kind of authentication
20 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.
22 ** Bootstrap straight.el
23 straight.el is really nice for managing package, and it integrates nicely with use-package. It uses the bootstrapping system defined here for installation.
24 #+begin_src emacs-lisp
25 (defvar bootstrap-version)
27 (expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory))
28 (bootstrap-version 5))
29 (unless (file-exists-p bootstrap-file)
31 (url-retrieve-synchronously
32 "https://raw.githubusercontent.com/raxod502/straight.el/develop/install.el"
33 'silent 'inhibit-cookies)
34 (goto-char (point-max))
35 (eval-print-last-sexp)))
36 (load bootstrap-file nil 'nomessage))
38 ** Replace use-package with straight
39 #+begin_src emacs-lisp
40 (straight-use-package 'use-package)
41 (setq straight-use-package-by-default t)
45 Very nice high contrast theme.
47 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.
48 #+begin_src emacs-lisp
49 (setq modus-themes-slanted-constructs t
50 modus-themes-bold-constructs t
51 modus-themes-org-blocks 'grayscale
52 modus-themes-mode-line '3d
53 modus-themes-scale-headings t
54 modus-themes-region 'no-extend
55 modus-themes-diffs 'desaturated)
56 (load-theme 'modus-vivendi t)
60 Great programming font with ligatures.
61 #+begin_src emacs-lisp
62 (add-to-list 'default-frame-alist '(font . "JetBrainsMonoNF-12"))
65 #+begin_src emacs-lisp
67 :straight (ligature :type git :host github :repo "mickeynp/ligature.el")
69 (ligature-set-ligatures
70 '(prog-mode text-mode)
71 '("-|" "-~" "---" "-<<" "-<" "--" "->" "->>" "-->" "///" "/=" "/=="
72 "/>" "//" "/*" "*>" "*/" "<-" "<<-" "<=>" "<=" "<|" "<||"
73 "<|||" "<|>" "<:" "<>" "<-<" "<<<" "<==" "<<=" "<=<" "<==>" "<-|"
74 "<<" "<~>" "<=|" "<~~" "<~" "<$>" "<$" "<+>" "<+" "</>" "</" "<*"
75 "<*>" "<->" "<!--" ":>" ":<" ":::" "::" ":?" ":?>" ":=" "::=" "=>>"
76 "==>" "=/=" "=!=" "=>" "===" "=:=" "==" "!==" "!!" "!=" ">]" ">:"
77 ">>-" ">>=" ">=>" ">>>" ">-" ">=" "&&&" "&&" "|||>" "||>" "|>" "|]"
78 "|}" "|=>" "|->" "|=" "||-" "|-" "||=" "||" ".." ".?" ".=" ".-" "..<"
79 "..." "+++" "+>" "++" "[||]" "[<" "[|" "{|" "??" "?." "?=" "?:" "##"
80 "###" "####" "#[" "#{" "#=" "#!" "#:" "#_(" "#_" "#?" "#(" ";;" "_|_"
81 "__" "~~" "~~>" "~>" "~-" "~@" "$>" "^=" "]#"))
82 (global-ligature-mode t))
85 #+begin_src emacs-lisp
87 :config (global-emojify-mode))
89 ;; http://ergoemacs.org/emacs/emacs_list_and_set_font.html
94 ((member "Twitter Color Emoji" (font-family-list)) "Twitter Color Emoji")
95 ((member "Noto Color Emoji" (font-family-list)) "Noto Color Emoji")
96 ((member "Noto Emoji" (font-family-list)) "Noto Emoji")))
99 Display relative line numbers except in some modes
100 #+begin_src emacs-lisp
101 (global-display-line-numbers-mode)
102 (setq display-line-numbers-type 'relative)
103 (dolist (no-line-num '(term-mode-hook
108 (add-hook no-line-num (lambda () (display-line-numbers-mode 0))))
110 ** Highlight matching parenthesis
111 #+begin_src emacs-lisp
113 :config (show-paren-mode)
114 :custom (show-paren-style 'parenthesis))
117 *** Show current function
118 #+begin_src emacs-lisp
119 (which-function-mode)
121 *** Make position in file more descriptive
122 Show current column and file size.
123 #+begin_src emacs-lisp
125 (size-indication-mode)
128 #+begin_src emacs-lisp
130 :config (minions-mode))
133 Show a ruler at a certain number of chars depending on mode.
134 #+begin_src emacs-lisp
135 (global-display-fill-column-indicator-mode)
138 Whenever starting a key chord, show possible future steps.
139 #+begin_src emacs-lisp
140 (use-package which-key
141 :config (which-key-mode)
142 :custom (which-key-idle-delay 0.3))
144 ** Visual highlights of changes
145 Highlight when changes are made.
146 #+begin_src emacs-lisp
147 (use-package evil-goggles
148 :config (evil-goggles-mode)
149 (evil-goggles-use-diff-faces))
151 ** Highlight TODOs in comments
152 #+begin_src emacs-lisp
154 :straight (hl-todo :type git :host github :repo "tarsius/hl-todo")
155 :config (global-hl-todo-mode 1))
158 #+begin_src emacs-lisp
162 Soft wrap words and do operations by visual lines.
163 #+begin_src emacs-lisp
164 (add-hook 'text-mode-hook 'turn-on-visual-line-mode)
166 ** Display number of matches in search
167 #+begin_src emacs-lisp
169 :config (global-anzu-mode))
172 Inverts modeline instead of audible bell or the standard visual bell.
173 #+begin_src emacs-lisp
174 (setq visible-bell nil
175 ring-bell-function 'flash-mode-line)
176 (defun flash-mode-line ()
177 (invert-face 'mode-line)
178 (run-with-timer 0.1 nil #'invert-face 'mode-line))
182 #+begin_src emacs-lisp
184 :custom (select-enable-clipboard nil)
187 (fset 'evil-visual-update-x-selection 'ignore) ;; Keep clipboard and register seperate
188 ;; Use visual line motions even outside of visual-line-mode buffers
189 (evil-global-set-key 'motion "j" 'evil-next-visual-line)
190 (evil-global-set-key 'motion "k" 'evil-previous-visual-line)
191 (global-set-key (kbd "<escape>") 'keyboard-escape-quit))
194 #+begin_src emacs-lisp
195 (use-package evil-collection
197 :init (evil-collection-init)
198 :custom (evil-collection-setup-minibuffer t))
202 #+begin_src emacs-lisp
203 (use-package evil-surround
204 :config (global-evil-surround-mode))
207 #+begin_src emacs-lisp
208 (use-package evil-leader
209 :straight (evil-leader :type git :host github :repo "cofi/evil-leader")
211 (evil-leader/set-leader "<SPC>")
212 (global-evil-leader-mode))
215 #+begin_src emacs-lisp
217 (use-package evil-nerd-commenter
218 :bind (:map evil-normal-state-map
219 ("gc" . evilnc-comment-or-uncomment-lines))
220 :custom (evilnc-invert-comment-line-by-line nil))
223 Fix the oopsies! Maybe replace with undo-fu or Emacs 28 built in undo-redo.
224 #+begin_src emacs-lisp
225 (use-package undo-tree
227 (undo-tree-auto-save-history t)
228 (undo-tree-history-directory-alist '(("." . "~/.emacs.d/undo-tree")))
230 (global-undo-tree-mode)
231 (evil-set-undo-system 'undo-tree))
233 ** Number incrementing
235 #+begin_src emacs-lisp
236 (use-package evil-numbers
237 :straight (evil-numbers :type git :host github :repo "juliapath/evil-numbers")
238 :bind (:map evil-normal-state-map
239 ("C-M-a" . evil-numbers/inc-at-pt)
240 ("C-M-x" . evil-numbers/dec-at-pt)))
244 #+begin_src emacs-lisp
245 (use-package evil-org
247 :hook (org-mode . evil-org-mode)
249 (evil-org-set-key-theme '(textobjects insert navigation shift todo)))
250 (use-package evil-org-agenda
251 :straight (:type built-in)
254 (evil-org-agenda-set-keys))
257 #+begin_src emacs-lisp
258 (evil-leader/set-key-for-mode 'org-mode
259 "T" 'org-show-todo-tree
261 "c" 'org-archive-subtree)
265 #+begin_src emacs-lisp
267 :straight (:type built-in)
268 :commands (org-capture org-agenda)
270 (org-ellipsis " â–¾")
271 (org-agenda-start-with-log-mode t)
272 (org-agenda-files (quote ("~/Org/tasks.org" "~/Org/break.org")))
274 (org-log-into-drawer t)
275 (org-src-tab-acts-natively t)
276 (org-src-fontify-natively t)
277 (org-startup-indented t)
278 (org-hide-emphasis-markers t)
279 (org-fontify-whole-block-delimiter-line nil)
280 :bind ("C-c a" . org-agenda))
283 #+begin_src emacs-lisp
284 (use-package org-tempo
286 :straight (:type built-in)
288 ;; TODO: There's gotta be a more efficient way to write this
289 (add-to-list 'org-structure-template-alist '("el" . "src emacs-lisp"))
290 (add-to-list 'org-structure-template-alist '("sp" . "src conf :tangle ~/.spectrwm.conf"))
291 (add-to-list 'org-structure-template-alist '("zsh" . "src shell :tangle ~/.config/zsh/zshrc"))
292 (add-to-list 'org-structure-template-alist '("al" . "src yml :tangle ~/.config/alacritty/alacritty.yml"))
293 (add-to-list 'org-structure-template-alist '("ipy" . "src python :tangle ~/.ipython/"))
294 (add-to-list 'org-structure-template-alist '("pi" . "src conf :tangle ~/.config/picom/picom.conf"))
295 (add-to-list 'org-structure-template-alist '("git" . "src conf :tangle ~/.gitconfig"))
296 (add-to-list 'org-structure-template-alist '("du" . "src conf :tangle ~/.config/dunst/dunstrc")))
300 Simple, but not too simple autocompletion.
301 #+begin_src emacs-lisp
303 :bind (("C-s" . swiper)
304 :map ivy-minibuffer-map
305 ("TAB" . ivy-alt-done)
306 :map ivy-switch-buffer-map
307 ("M-d" . ivy-switch-buffer-kill))
311 #+begin_src emacs-lisp
312 (use-package ivy-rich
314 :config (ivy-rich-mode))
318 #+begin_src emacs-lisp
320 :bind (("C-M-j" . 'counsel-switch-buffer)
321 :map minibuffer-local-map
322 ("C-r" . 'counsel-minibuffer-history))
323 :custom (counsel-linux-app-format-function #'counsel-linux-app-format-function-name-only)
324 :config (counsel-mode))
326 ** Remember frequent commands
327 #+begin_src emacs-lisp
328 (use-package ivy-prescient
331 (ivy-prescient-enable-filtering nil)
333 (prescient-persist-mode)
334 (ivy-prescient-mode))
337 Better search utility.
338 #+begin_src emacs-lisp
343 Use elfeed for RSS. I have another file with all the feeds in it.
344 #+begin_src emacs-lisp
346 :bind (("C-c e" . elfeed))
348 (load "~/.emacs.d/feeds.el")
349 (add-hook 'elfeed-new-entry-hook
350 (elfeed-make-tagger :feed-url "youtube\\.com"
352 :bind (:map elfeed-search-mode-map ("C-c C-o" . 'elfeed-show-visit)))
354 (use-package elfeed-goodies
356 :config (elfeed-goodies/setup))
359 Use mu4e for reading emails.
361 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.
363 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.
364 #+begin_src emacs-lisp
365 (use-package smtpmail
366 :straight (:type built-in))
368 :load-path "/usr/share/emacs/site-lisp/mu4e"
369 :bind (("C-c m" . mu4e))
371 (setq user-full-name "Armaan Bhojwani"
372 smtpmail-local-domain "armaanb.net"
373 smtpmail-stream-type 'ssl
374 smtpmail-smtp-service '465
375 mu4e-change-filenames-when-moving t
376 message-kill-buffer-on-exit t
377 mu4e-get-mail-command "offlineimap -q"
378 message-citation-line-format "On %a %d %b %Y at %R, %f wrote:\n"
379 message-citation-line-function 'message-insert-formatted-citation-line
380 mu4e-context-policy "pick-first"
382 `( ,(make-mu4e-context
384 :enter-func (lambda () (mu4e-message "Entering school context"))
385 :leave-func (lambda () (mu4e-message "Leaving school context"))
386 :match-func (lambda (msg)
388 (string-match-p "^/school" (mu4e-message-field msg :maildir))))
389 :vars '( (user-mail-address . "abhojwani22@nobles.edu")
390 (mu4e-sent-folder . "/school/Sent")
391 (mu4e-drafts-folder . "/school/Drafts")
392 (mu4e-trash-folder . "/school/Trash")
393 (mu4e-refile-folder . "/school/Archive")
394 (user-mail-address . "abhojwani22@nobles.edu")
395 (smtpmail-smtp-user . "abhojwani22@nobles.edu")
396 (smtpmail-smtp-server . "smtp.gmail.com")))
399 :enter-func (lambda () (mu4e-message "Entering personal context"))
400 :leave-func (lambda () (mu4e-message "Leaving personal context"))
401 :match-func (lambda (msg)
403 (string-match-p "^/personal" (mu4e-message-field msg :maildir))))
405 (mu4e-sent-folder . "/personal/Sent")
406 (mu4e-drafts-folder . "/personal/Drafts")
407 (mu4e-trash-folder . "/personal/Trash")
408 (mu4e-refile-folder . "/personal/Archive")
409 (user-mail-address . "me@armaanb.net")
410 (smtpmail-smtp-user . "me@armaanb.net")
411 (smtpmail-smtp-server "smtp.mailbox.org")
412 (mu4e-drafts-folder . "/school/Drafts")
413 (mu4e-trash-folder . "/school/Trash")))))
414 (add-to-list 'mu4e-bookmarks
415 '(:name "Unified inbox"
416 :query "maildir:\"/personal/INBOX\" or maildir:\"/school/INBOX\""
420 #+begin_src emacs-lisp
422 (use-package calfw-org)
423 (use-package calfw-ical)
425 (defun acheam-calendar ()
428 (shell-command "vdirsyncer sync")
429 (let ((default-directory "~/.local/share/vdirsyncer/"))
430 (cfw:open-calendar-buffer
433 (cfw:ical-create-source "School" (expand-file-name "school/abhojwani22@nobles.edu.ics") "Green")
434 (cfw:ical-create-source "Personal" (expand-file-name "mailbox/Y2FsOi8vMC8zMQ.ics") "Blue")
435 (cfw:ical-create-source "Birthdays" (expand-file-name "mailbox/Y2FsOi8vMS8w.ics") "Gray")
439 Another file has more specific network configuration.
440 #+begin_src emacs-lisp
442 :config (load-file "~/.emacs.d/irc.el"))
444 (use-package circe-chanop
445 :straight (:type built-in)
448 (use-package circe-color-nicks
449 :straight (:type built-in)
453 Set EWW as default browser except for videos.
454 #+begin_src emacs-lisp
455 (defun browse-url-mpv (url &optional new-window)
457 (start-process "mpv" "*mpv*" "mpv" url))
459 (setq browse-url-handlers
461 (("youtu\\.?be" . browse-url-mpv)
462 ("." . eww-browse-url)
466 Some EWW enhancements.
467 *** Give buffer a useful name
468 #+begin_src emacs-lisp
469 ;; From https://protesilaos.com/dotemacs/
470 (defun prot-eww--rename-buffer ()
471 "Rename EWW buffer using page title or URL.
472 To be used by `eww-after-render-hook'."
473 (let ((name (if (eq "" (plist-get eww-data :title))
474 (plist-get eww-data :url)
475 (plist-get eww-data :title))))
476 (rename-buffer (format "*%s # eww*" name) t)))
478 (add-hook 'eww-after-render-hook #'prot-eww--rename-buffer)
480 *** Better entrypoint
481 #+begin_src emacs-lisp
482 ;; From https://protesilaos.com/dotemacs/
483 (defun prot-eww-browse-dwim (url &optional arg)
484 "Visit a URL, maybe from `eww-prompt-history', with completion.
486 With optional prefix ARG (\\[universal-argument]) open URL in a
489 If URL does not look like a valid link, run a web query using
492 When called from an eww buffer, provide the current link as
496 (completing-read "Query:" eww-prompt-history
497 nil nil (plist-get eww-data :url) 'eww-prompt-history)
499 (eww url (if arg 4 nil)))
501 (global-set-key (kbd "C-c w") 'prot-eww-browse-dwim)
504 Use Emacs globally. Use the Emacs daemon and bind a key in your wm to
505 "emacsclient --eval "(emacs-everywhere)".
506 #+begin_src emacs-lisp
507 (use-package emacs-everywhere)
512 #+begin_src emacs-lisp
513 (use-package lsp-mode
514 :commands (lsp lsp-deferred)
515 :custom (lsp-keymap-prefix "C-c l")
516 :hook ((lsp-mode . lsp-enable-which-key-integration)))
518 (use-package lsp-ivy)
521 :commands lsp-ui-mode
522 :custom (lsp-ui-doc-position 'bottom))
523 (use-package lsp-ui-flycheck
525 :straight (:type built-in))
528 Company-box adds icons.
529 #+begin_src emacs-lisp
532 :hook (lsp-mode . company-mode)
533 :bind (:map company-active-map
534 ("<tab>" . company-complete-selection))
536 ("<tab>" . company-indent-or-complete-common))
538 (company-minimum-prefix-length 1)
539 (setq company-dabbrev-downcase 0)
540 (company-idle-delay 0.0))
542 (use-package company-box
543 :hook (company-mode . company-box-mode))
547 #+begin_src emacs-lisp
548 (use-package lsp-pyright
549 :hook (python-mode . (lambda ()
550 (use-package lsp-pyright
551 :straight (:type built-in))
555 #+begin_src emacs-lisp
557 :hook (python-mode . blacken-mode)
559 (setq blacken-line-length 79))
562 (use-package ws-butler
564 (ws-butler-global-mode))
567 #+begin_src emacs-lisp
568 (use-package flycheck
570 (global-flycheck-mode))
572 ** Project management
573 #+begin_src emacs-lisp
574 (use-package projectile
575 :config (projectile-mode)
576 :custom ((projectile-completion-system 'ivy))
578 ("C-c p" . projectile-command-map)
580 (when (file-directory-p "~/Code")
581 (setq projectile-project-search-path '("~/Code")))
582 (setq projectile-switch-project-action #'projectile-dired))
584 (use-package counsel-projectile
586 :config (counsel-projectile-mode))
589 #+begin_src emacs-lisp
591 :straight (:type built-in)
592 :commands (dired dired-jump)
593 :custom ((dired-listing-switches "-agho --group-directories-first"))
595 (evil-collection-define-key 'normal 'dired-mode-map
596 "h" 'dired-single-up-directory
597 "l" 'dired-single-buffer))
599 (use-package dired-single
600 :commands (dired dired-jump))
602 (use-package dired-open
603 :commands (dired dired-jump)
605 (dired-open-extensions '(("png" . "feh")
608 (use-package dired-hide-dotfiles
609 :hook (dired-mode . dired-hide-dotfiles-mode)
611 (evil-collection-define-key 'normal 'dired-mode-map
612 "H" 'dired-hide-dotfiles-mode))
616 # TODO: Write a command that commits hunk, skipping staging step.
617 #+begin_src emacs-lisp
620 *** Colored diff in line number area
621 #+begin_src emacs-lisp
623 :straight (diff-hl :type git :host github :repo "dgutov/diff-hl")
624 :hook ((magit-pre-refresh-hook . diff-hl-magit-pre-refresh)
625 (magit-post-refresh-hook . diff-hl-magit-post-refresh))
626 :config (global-diff-hl-mode))
628 * General text editing
630 Indent after every change.
631 #+begin_src emacs-lisp
632 (use-package aggressive-indent
633 :config (global-aggressive-indent-mode))
636 Spell check in text mode, and in prog-mode comments.
637 #+begin_src emacs-lisp
638 (dolist (hook '(text-mode-hook))
639 (add-hook hook (lambda () (flyspell-mode))))
640 (dolist (hook '(change-log-mode-hook log-edit-mode-hook))
641 (add-hook hook (lambda () (flyspell-mode -1))))
642 (add-hook 'prog-mode (lambda () (flyspell-prog mode)))
644 ** Expand tabs to spaces
645 #+begin_src emacs-lisp
646 (setq-default tab-width 2)
648 ** Copy kill ring to clipboard
649 #+begin_src emacs-lisp
650 (setq x-select-enable-clipboard t)
651 (defun copy-kill-ring-to-xorg ()
652 "Copy the current kill ring to the xorg clipboard."
654 (x-select-text (current-kill 0)))
657 #+begin_src emacs-lisp
658 (use-package browse-kill-ring)
661 Opens file where you left it.
662 #+begin_src emacs-lisp
666 Distraction free writing a la junegunn/goyo.
667 #+begin_src emacs-lisp
668 (use-package olivetti
670 (evil-leader/set-key "o" 'olivetti-mode))
674 #+begin_src emacs-lisp
675 (setq abbrev-file-name "~/.emacs.d/abbrevs")
676 (setq save-abbrevs 'silent)
677 (setq-default abbrev-mode t)
680 #+begin_src emacs-lisp
681 (setq tramp-default-method "ssh")
684 ** Easily convert splits
685 Converts splits from horizontal to vertical and vice versa. Lifted from EmacsWiki.
686 #+begin_src emacs-lisp
687 (defun toggle-window-split ()
689 (if (= (count-windows) 2)
690 (let* ((this-win-buffer (window-buffer))
691 (next-win-buffer (window-buffer (next-window)))
692 (this-win-edges (window-edges (selected-window)))
693 (next-win-edges (window-edges (next-window)))
694 (this-win-2nd (not (and (<= (car this-win-edges)
695 (car next-win-edges))
696 (<= (cadr this-win-edges)
697 (cadr next-win-edges)))))
699 (if (= (car this-win-edges)
700 (car (window-edges (next-window))))
701 'split-window-horizontally
702 'split-window-vertically)))
703 (delete-other-windows)
704 (let ((first-win (selected-window)))
706 (if this-win-2nd (other-window 1))
707 (set-window-buffer (selected-window) this-win-buffer)
708 (set-window-buffer (next-window) next-win-buffer)
709 (select-window first-win)
710 (if this-win-2nd (other-window 1))))))
712 (define-key ctl-x-4-map "t" 'toggle-window-split)
715 #+begin_src emacs-lisp
716 (defun insert-date ()
718 (insert (format-time-string "%Y-%m-%d")))
722 #+begin_src emacs-lisp
723 (use-package ace-window
724 :bind ("M-o" . ace-window))
726 ** Kill current buffer
727 Makes "C-x k" binding faster.
728 #+begin_src emacs-lisp
729 (substitute-key-definition 'kill-buffer 'kill-buffer-and-window global-map)
733 Render OpenSCAD files, and add a preview window.
735 Personal fork just merges a PR.
736 #+begin_src emacs-lisp
737 (use-package scad-mode)
738 (use-package scad-preview
739 :straight (scad-preview :type git :host github :repo "Armaanb/scad-preview"))
741 ** Control backup files
742 Stop backup files from spewing everywhere.
743 #+begin_src emacs-lisp
744 (setq backup-directory-alist `(("." . "~/.emacs.d/backups")))
746 ** Make yes/no easier
747 #+begin_src emacs-lisp
748 (defalias 'yes-or-no-p 'y-or-n-p)
750 ** Move customize file
751 No more clogging up init.el.
752 #+begin_src emacs-lisp
753 (setq custom-file "~/.emacs.d/custom.el")
757 #+begin_src emacs-lisp
759 :commands (helpful-callable helpful-variable helpful-command helpful-key)
761 (counsel-describe-function-function #'helpful-callable)
762 (counsel-describe-variable-function #'helpful-variable)
764 ([remap describe-function] . counsel-describe-function)
765 ([remap describe-command] . helpful-command)
766 ([remap describe-variable] . counsel-describe-variable)
767 ([remap describe-key] . helpful-key))
770 #+begin_src emacs-lisp
771 (use-package epa-file
772 :straight (:type built-in)
774 (epa-file-select-keys nil)
775 (epa-file-encrypt-to '("me@armaanb.net"))
776 (password-cache-expiry (* 60 15)))
778 (use-package pinentry
779 :config (pinentry-start))
782 #+begin_src emacs-lisp
784 :straight (0x0 :type git :repo "https://git.sr.ht/~zge/nullpointer-emacs")
785 :custom (0x0-default-service 'envs)
786 :config (evil-leader/set-key
788 "0f" '0x0-upload-file
789 "0s" '0x0-upload-string
790 "0c" '0x0-upload-kill-ring
791 "0p" '0x0-upload-popup))
796 #+begin_src conf :tangle ~/.spectrwm.conf
802 autorun = ws[1]:/home/armaa/Code/scripts/autostart
806 #+begin_src conf :tangle ~/.spectrwm.conf
807 color_focus = rgb:83/a5/98
808 color_focus_maximized = rgb:d6/5d/0e
809 color_unfocus = rgb:58/58/58
812 #+begin_src conf :tangle ~/.spectrwm.conf
814 bar_font = xos4 Fira Code:pixelsize=14:antialias=true # any installed font
818 #+begin_src conf :tangle ~/.spectrwm.conf
819 program[lock] = i3lock -c 000000 -ef
820 program[term] = alacritty
821 program[screenshot_all] = flameshot gui
822 program[menu] = rofi -show run # `rofi-dmenu` handles the rest
823 program[switcher] = rofi -show window
824 program[notif] = /home/armaa/Code/scripts/setter status
827 bind[switcher] = MOD+Tab
830 #+begin_src conf :tangle ~/.spectrwm.conf
831 program[paup] = /home/armaa/Code/scripts/setter audio +5
832 program[padown] = /home/armaa/Code/scripts/setter audio -5
833 program[pamute] = /home/armaa/Code/scripts/setter audio
834 program[brigup] = /home/armaa/Code/scripts/setter brightness +10%
835 program[brigdown] = /home/armaa/Code/scripts/setter brightness 10%-
836 program[next] = playerctl next
837 program[prev] = playerctl previous
838 program[pause] = playerctl play-pause
840 bind[padown] = XF86AudioLowerVolume
841 bind[paup] = XF86AudioRaiseVolume
842 bind[pamute] = XF86AudioMute
843 bind[brigdown] = XF86MonBrightnessDown
844 bind[brigup] = XF86MonBrightnessUp
845 bind[pause] = XF86AudioPlay
846 bind[next] = XF86AudioNext
847 bind[prev] = XF86AudioPrev
850 #+begin_src conf :tangle ~/.spectrwm.conf
851 program[h] = xdotool keyup h key --clearmodifiers Left
852 program[j] = xdotool keyup j key --clearmodifiers Down
853 program[k] = xdotool keyup k key --clearmodifiers Up
854 program[l] = xdotool keyup l key --clearmodifiers Right
856 bind[h] = Mod1 + Tab + h
857 bind[j] = Mod1 + Tab + j
858 bind[k] = Mod1 + Tab + k
859 bind[l] = Mod1 + Tab + l
862 #+begin_src conf :tangle ~/.spectrwm.conf
863 program[aerc] = alacritty -e aerc
864 program[weechat] = alacritty --hold -e sh -c "while : ; do ssh -p 23 -t root@armaanb.net tmux attach-session -t weechat; sleep 2; done"
865 program[emacs] = emacsclient -c
866 program[emacs-anywhere] = emacsclient --eval "(emacs-everywhere)"
867 program[firefox] = firefox
868 program[thunderbird] = thunderbird
869 program[slack] = slack
871 bind[aerc] = MOD+Control+s
872 bind[weechat] = MOD+Control+d
873 bind[emacs] = MOD+Control+f
874 bind[emacs-anywhere] = MOD+f
875 bind[firefox] = MOD+Control+u
876 bind[thunderbird] = MOD+Control+i
877 bind[slack] = MOD+Control+o
882 #+begin_src shell :tangle ~/.config/zsh/zshrc
883 autoload -Uz compinit
887 unsetopt glob_complete
890 #+begin_src shell :tangle ~/.config/zsh/zshrc
894 bindkey -M vicmd "^[[3~" delete-char
895 bindkey "^[[3~" delete-char
897 autoload edit-command-line
898 zle -N edit-command-line
899 bindkey -M vicmd ^e edit-command-line
900 bindkey ^e edit-command-line
903 #+begin_src shell :tangle ~/.config/zsh/zshrc
904 setopt extended_history
906 setopt inc_append_history
907 setopt hist_ignore_dups
908 setopt hist_reduce_blanks
912 HISTFILE=~/.local/share/zsh/history
915 I manage plugins using my own plugin manager, ZPE. https://git.sr.ht/~armaan/zpe
917 #+begin_src plain :tangle ~/.config/zpe/repositories
918 https://github.com/Aloxaf/fzf-tab
919 https://github.com/zdharma/fast-syntax-highlighting
920 https://github.com/rupa/z
923 #+begin_src shell :tangle ~/.config/zsh/zshrc
924 source ~/Code/zpe/zpe.sh
925 source ~/Code/admone/admone.zsh
926 source ~/.config/zsh/fzf-bindings.zsh
928 zpe-source fzf-tab/fzf-tab.zsh
929 zstyle ':completion:*:descriptions' format '[%d]'
930 zstyle ':fzf-tab:complete:cd:*' fzf-preview 'exa -1 --color=always $realpath'
931 zstyle ':completion:*' completer _complete
932 zstyle ':completion:*' matcher-list 'm:{a-zA-Z}={A-Za-z}' \
933 'm:{a-zA-Z}={A-Za-z} l:|=* r:|=*'
935 zpe-source fast-syntax-highlighting/fast-syntax-highlighting.plugin.zsh
936 export _Z_DATA="/home/armaa/.local/share/z"
940 **** Alert after long command
941 #+begin_src shell :tangle ~/.config/zsh/zshrc
943 notify-send --urgency=low -i ${(%):-%(?.terminal.error)} \
944 ${history[$HISTCMD]%[;&|][[:space:]]##alert}
947 **** Time Zsh startup
948 #+begin_src shell :tangle ~/.config/zsh/zshrc
950 for i in $(seq 1 10); do
951 time "zsh" -i -c exit;
955 **** Update all packages
956 #+begin_src shell :tangle ~/.config/zsh/zshrc
957 color=$(tput setaf 5)
961 sudo echo "${color}== upgrading with yay ==${reset}"
964 echo "${color}== checking for pacnew files ==${reset}"
967 echo "${color}== upgrading flatpaks ==${reset}"
970 echo "${color}== upgrading zsh plugins ==${reset}"
973 echo "${color}== updating nvim plugins ==${reset}"
974 nvim +PlugUpdate +PlugUpgrade +qall
975 echo "Updated nvim plugins"
977 echo "${color}You are entirely up to date!${reset}"
980 **** Clean all packages
981 #+begin_src shell :tangle ~/.config/zsh/zshrc
983 sudo echo "${color}== cleaning pacman orphans ==${reset}"
984 (pacman -Qtdq | sudo pacman -Rns - 2> /dev/null) || echo "No orphans"
986 echo "${color}== cleaning flatpaks ==${reset}"
987 flatpak remove --unused
989 echo "${color}== cleaning zsh plugins ==${reset}"
992 echo "${color}== cleaning nvim plugins ==${reset}"
993 nvim +PlugClean +qall
994 echo "Cleaned nvim plugins"
996 echo "${color}All orphans cleaned!${reset}"
1000 #+begin_src shell :tangle ~/.config/zsh/zshrc
1003 exa -lh --icons --git --group-directories-first
1007 #+begin_src shell :tangle ~/.config/zsh/zshrc
1009 __conda_setup="$('/opt/anaconda/bin/conda' 'shell.zsh' 'hook' 2> /dev/null)"
1010 if [ $? -eq 0 ]; then
1011 eval "$__conda_setup"
1013 if [ -f "/opt/anaconda/etc/profile.d/conda.sh" ]; then
1014 . "/opt/anaconda/etc/profile.d/conda.sh"
1016 export PATH="/opt/anaconda/bin:$PATH"
1022 **** Interact with 0x0
1023 #+begin_src shell :tangle ~/.config/zsh/zshrc
1024 zxz="https://envs.sh"
1025 0file() { curl -F"file=@$1" "$zxz" ; }
1026 0pb() { curl -F"file=@-;" "$zxz" ; }
1027 0url() { curl -F"url=$1" "$zxz" ; }
1028 0short() { curl -F"shorten=$1" "$zxz" ; }
1029 0clip() { xclip -out | curl -F"file=@-;" "$zxz" ; }
1032 #+begin_src shell :tangle ~/.config/zsh/zshrc
1041 #+begin_src shell :tangle ~/.config/zsh/zshrc
1042 alias bhoji-drop='ssh -p 23 root@armaanb.net'
1043 alias weechat='ssh -p 23 -t root@armaanb.net tmux attach-session -t weechat'
1044 alias tcf='ssh root@204.48.23.68'
1045 alias ngmun='ssh root@157.245.89.25'
1046 alias prox='ssh root@192.168.1.224'
1047 alias dock='ssh root@192.168.1.225'
1048 alias jenkins='ssh root@192.168.1.226'
1049 alias envs='ssh acheam@envs.net'
1051 **** File management
1052 #+begin_src shell :tangle ~/.config/zsh/zshrc
1053 alias ls='exa -lh --icons --git --group-directories-first'
1054 alias la='exa -lha --icons --git --group-directories-first'
1055 alias df='df -h / /boot'
1057 alias free='free -h'
1062 alias grep='grep -in --exclude-dir=.git --color=auto'
1063 alias mkdir='mkdir -pv'
1064 alias unar='atool -x'
1065 alias wget='wget -e robots=off'
1066 alias lanex='~/.local/share/lxc/lxc'
1069 #+begin_src shell :tangle ~/.config/zsh/zshrc
1070 alias padm='yadm --yadm-repo ~/Code/dotfiles/repo.git'
1071 alias yadu='yadm add -u && yadm commit -m "Updated `date -Iseconds`" && \
1073 alias padu='padm add -u && padm commit && padm push && yadu'
1076 #+begin_src shell :tangle ~/.config/zsh/zshrc
1079 alias vw="nvim ~/Documents/vimwiki/index.md"
1081 **** System management
1082 #+begin_src shell :tangle ~/.config/zsh/zshrc
1083 alias jctl='journalctl -p 3 -xb'
1084 alias pkill='pkill -i'
1086 alias please='sudo $(fc -ln -1)'
1087 alias sudo='sudo ' # allows aliases to be run with sudo
1090 #+begin_src shell :tangle ~/.config/zsh/zshrc
1091 alias ping='ping -c 10'
1092 alias speed='speedtest-cli'
1093 alias ip='ip --color=auto'
1094 alias cip='curl https://armaanb.net/ip'
1095 alias gps='gpg --keyserver keyserver.ubuntu.com --search-keys'
1096 alias gpp='gpg --keyserver keyserver.ubuntu.com --recv-key'
1099 #+begin_src shell :tangle ~/.config/zsh/zshrc
1100 alias dc='docker-compose'
1101 alias dcdu='docker-compose down && docker-compose up -d'
1104 #+begin_src shell :tangle ~/.config/zsh/zshrc
1105 alias bigrandomfile='dd if=/dev/urandom of=1GB-urandom bs=1M count=1024 \
1106 iflag=fullblock status=progress'
1107 alias bigboringfile='dd if=/dev/zero of=1GB-zero bs=1M count=1024 \
1108 iflag=fullblock status=progress'
1109 alias ts='gen-shell -c task'
1110 alias ts='gen-shell -c task'
1111 alias tetris='autoload -Uz tetriscurses && tetriscurses'
1112 alias news='newsboat'
1113 alias tilderadio="\mpv https://radio.tildeverse.org/radio/8000/radio.ogg"
1114 alias ytmusic="youtube-dl -x --add-metadata --audio-format aac \
1115 --restrict-filenames -o '%(title)s.%(ext)s'"
1116 alias cal="cal -3 --color=auto"
1118 **** Virtual machines, chroots
1119 #+begin_src shell :tangle ~/.config/zsh/zshrc
1120 alias ckiss="sudo chrooter ~/Virtual/kiss"
1121 alias cdebian="sudo chrooter ~/Virtual/debian bash"
1122 alias cwindows='devour qemu-system-x86_64 \
1127 -device VGA,vgamem_mb=64 \
1129 -device hda-duplex \
1131 -net user,smb=/home/armaa/Public \
1132 -drive format=qcow2,file=/home/armaa/Virtual/windows.qcow2'
1135 #+begin_src shell :tangle ~/.config/zsh/zshrc
1137 alias zpy="zconda && ipython"
1138 alias math="ipython --profile=math"
1139 alias pypi="python setup.py sdist && twine upload dist/*"
1140 alias pip="python -m pip"
1141 alias black="black -l 79"
1144 #+begin_src shell :tangle ~/.config/zsh/zshrc
1145 alias words='gen-shell -c "words"'
1146 alias words-e='gen-shell -c "words ~E"'
1149 #+begin_src shell :tangle ~/.config/zsh/zshrc
1150 alias zathura='devour zathura'
1151 alias mpv='devour mpv'
1152 alias sql='devour sqlitebrowser'
1153 alias cad='devour openscad'
1154 alias feh='devour feh'
1156 **** Package management (Pacman)
1157 #+begin_src shell :tangle ~/.config/zsh/zshrc
1159 alias api='yay -Syu'
1160 alias app='yay -Rns'
1162 alias apo='yay -Qttd'
1163 alias azf='pacman -Q | fzf'
1164 alias favorites='pacman -Qe | cut -d " " -f 1 > ~/Documents/favorites'
1165 alias ufetch='ufetch-arch'
1166 alias reflect='reflector --verbose --sort rate --save \
1167 ~/.local/etc/pacman.d/mirrorlist --download-timeout 60' # Takes ~45m to run
1170 #+begin_src shell :tangle ~/.config/zsh/zshrc
1171 export EDITOR="emacsclient -c" # $EDITOR opens in terminal
1172 export VISUAL="emacsclient -c -a emacs" # $VISUAL opens in GUI mode
1173 export TERM=xterm-256color # for compatability
1175 export GPG_TTY="$(tty)"
1176 export MANPAGER='nvim +Man!'
1179 # generated with "vivid generate gruvbox"
1180 export LS_COLORS="$(cat ~/.local/share/zsh/gruvbox)"
1182 export GTK_USE_PORTAL=1
1184 export PATH="/home/armaa/.local/bin:$PATH" # prioritize .local/bin
1185 export PATH="$PATH:/home/armaa/Code/scripts"
1186 export PATH="$PATH:/home/armaa/.cargo/bin"
1187 export PATH="$PATH:/home/armaa/.local/share/gem/ruby/2.7.0/bin"
1188 export PATH="$PATH:/usr/sbin"
1189 export PATH="$PATH:/opt/FreeTube/freetube"
1191 export LC_ALL="en_US.UTF-8"
1192 export LC_CTYPE="en_US.UTF-8"
1193 export LANGUAGE="en_US.UTF-8"
1195 export KISS_PATH="/home/armaa/kiss/home/armaa/kiss-repo"
1196 export KISS_PATH="$KISS_PATH:/home/armaa/Clone/repo-main/core"
1197 export KISS_PATH="$KISS_PATH:/home/armaa/Clone/repo-main/extra"
1198 export KISS_PATH="$KISS_PATH:/home/armaa/Clone/repo-main/xorg"
1199 export KISS_PATH="$KISS_PATH:/home/armaa/Clone/repo-main/testing"
1200 export KISS_PATH="$KISS_PATH:/home/armaa/Clone/repo-community/community"
1204 #+begin_src yml :tangle ~/.config/alacritty/alacritty.yml
1207 family: JetBrains Mono Nerd Font
1214 ligatures: true # Requires ligature patch
1221 background_opacity: 0.6
1224 Send <RET> + modifier through
1225 #+begin_src yml :tangle ~/.config/alacritty/alacritty.yml
1240 #+begin_src yml :tangle ~/.config/alacritty/alacritty.yml
1244 background: '#000000'
1245 foreground: '#ebdbb2'
1271 Symlink profile_default/ipython_config.py to profile_math/ipython_config.py
1272 #+begin_src python :tangle ~/.ipython/profile_default/ipython_config.py
1273 c.TerminalInteractiveShell.editing_mode = 'vi'
1274 c.InteractiveShell.colors = 'linux'
1275 c.TerminalInteractiveShell.confirm_exit = False
1278 #+begin_src python :tangle ~/.ipython/profile_math/startup.py
1282 return x * (180 / pi)
1285 return x * (pi / 180)
1288 return (x * (pi / 180)) / unit
1300 Make MPV play a little bit smoother.
1301 #+begin_src conf :tangle ~/.config/mpv/mpv.conf
1302 ytdl-format="bestvideo[height<=?1080]+bestaudio/best"
1307 #+begin_src conf :tangle ~/.config/picom/picom.conf
1310 shadow-offset-x = -5;
1311 shadow-offset-y = -5;
1314 #+begin_src conf :tangle ~/.config/picom/picom.conf
1319 #+begin_src conf :tangle ~/.config/picom/picom.conf
1322 method = "gaussian";
1328 Needs picom to be run with "--experimental-backends"
1329 #+begin_src conf :tangle ~/.config/picom/picom.conf
1333 For any GNU Readline programs
1334 #+begin_src plain :tangle ~/.inputrc
1338 https://github.com/sharkdp/vivid
1340 #+begin_src yml :tangle ~/.config/vivid/gruvbox.yml
1342 background_color: '282A36'
1354 #+begin_src yml :tangle ~/.config/vivid/gruvbox.yml
1371 missing_symlink_target:
1397 sticky_other_writable:
1430 continuous-integration:
1441 font-style: underline
1452 #+begin_src plain :tangle ~/.gitconfig
1454 name = Armaan Bhojwani
1455 email = me@armaanb.net
1456 signingkey = 0FEB9471E19C49C60CFBEB133C9ED82FFE788E4A
1459 #+begin_src plain :tangle ~/.gitconfig
1461 defaultBranch = main
1464 #+begin_src plain :tangle ~/.gitconfig
1469 #+begin_src plain :tangle ~/.gitconfig
1471 smtpserver = smtp.mailbox.org
1472 smtpuser = me@armaanb.net
1473 smtpencryption = ssl
1474 smtpserverport = 465
1478 #+begin_src plain :tangle ~/.gitconfig
1483 #+begin_src plain :tangle ~/.gitconfig
1486 sclone = clone --depth 1
1492 subup = submodule update --remote
1493 loc = diff --stat 4b825dc642cb6eb9a060e54bf8d69288fbee4904 # Empty hash
1494 mirror = git config --global alias.mirrormirror
1497 #+begin_src plain :tangle ~/.gitconfig
1502 Lightweight notification daemon. Gruvbox colors, based on https://github.com/a-schaefers/i3-wm-gruvbox-theme/
1504 #+begin_src conf :tangle ~/.config/dunst/dunstrc
1506 font = "JetBrains Mono Medium Nerd Font 11"
1508 format = "<b>%s</b>\n%b"
1510 indicate_hidden = yes
1513 show_age_threshold = 60
1516 geometry = "400x5-20+20"
1518 idle_threshold = 120
1520 sticky_history = yes
1522 separator_height = 4
1524 horizontal_padding = 8
1526 separator_color = "#585858"
1527 startup_notification = false
1530 #+begin_src conf :tangle ~/.config/dunst/dunstrc
1537 close_all = mod4+shift+c
1538 history = mod4+ctrl+c
1541 background = "#282828"
1542 foreground = "#ebdbb2"
1543 highlight = "#ebdbb2"
1547 background = "#282828"
1548 foreground = "#ebdbb2"
1549 highlight = "#ebdbb2"
1553 background = "#282828"
1554 foreground = "#cc241d"
1555 highlight = "#ebdbb2"