1.1--- a/emacs/default.el	Sat Nov 04 19:31:51 2023 -0400
     1.2+++ b/emacs/default.el	Sat Nov 04 20:11:43 2023 -0400
     1.3@@ -17,9 +17,8 @@
     1.4  use-short-answers t
     1.5  display-time-format "%Y-%m-%d %H:%M"
     1.6  ring-bell-function 'ignore
     1.7- gc-cons-percentage 0.6
     1.8  completion-ignore-case t
     1.9- ;; epa-pinentry-mode 'loopback
    1.10+ epg-pinentry-mode 'loopback
    1.11  shr-use-colors nil
    1.12  shr-use-fonts nil
    1.13  shr-max-image-proportion 0.6
    1.14@@ -43,11 +42,20 @@
    1.15 
    1.16 ;;; Variables
    1.17 (defvar default-theme 'modus-vivendi-deuteranopia)
    1.18+
    1.19 (defvar company-domain "compiler.company")
    1.20 (defvar company-name "The Compiler Company, LLC")
    1.21 (defvar company-vc-domain "vc.compiler.company")
    1.22 (defvar company-home "the.compiler.company")
    1.23 
    1.24+(defvar user-home-directory (expand-file-name "~"))
    1.25+(defvar user-lab-directory (expand-file-name "lab" user-home-directory))
    1.26+(defvar user-stash-directory (expand-file-name "stash" user-home-directory))
    1.27+(defvar user-store-directory (expand-file-name "store" user-home-directory))
    1.28+(defvar user-shed-directory (expand-file-name "shed" user-home-directory))
    1.29+(defvar user-mail-directory (expand-file-name "mail" user-home-directory))
    1.30+(defvar user-media-directory (expand-file-name "media" user-home-directory))
    1.31+
    1.32 ;;; Theme
    1.33 (add-hook 'after-init-hook (lambda () (load-theme default-theme)))
    1.34