1 files changed, 4 insertions, 141 deletions
diff --git a/emacs/.config/emacs/lisp/kj-init.el b/emacs/.config/emacs/lisp/kj-init.el
index 837bdf9..40dee7d 100644
--- a/emacs/.config/emacs/lisp/kj-init.el
+++ b/emacs/.config/emacs/lisp/kj-init.el
@@ -1,140 +1,5 @@
 ;;; -*- lexical-binding: t; -*-
 
-(setq user-full-name "KJ Orbekk"
-      user-mail-address "kj@orbekk.com")
-
-(defvar kj/cache-dir "~/.cache/emacs")
-
-(setq initial-scratch-message nil)
-
-(setq switch-to-buffer-obey-display-actions t)
-(setq switch-to-buffer-in-dedicated-window 'pop)
-(setq even-window-sizes 'width-only)
-
-(setq custom-file (expand-file-name "emacs-custom.el" user-emacs-directory))
-(load custom-file :noerror t)
-
-(setq bookmark-file (expand-file-name "boomarks" kj/cache-dir))
-
-(setq fast-but-imprecise-scrolling t)
-
-(setq use-short-answers t)
-
-(global-hl-line-mode 1)
-(global-auto-revert-mode 1)
-
-(setq outline-minor-mode-cycle t
-      outline-minor-mode-highlight 'override)
-
-(setq visible-bell t
-      ring-bell-function 'ignore)
-
-(setq auto-save-list-file-prefix (expand-file-name "auto-save-list/.saves-" kj/cache-dir))
-
-(use-package wombat-theme :elpaca nil
-  :disabled
-  :init
-  (load-theme 'wombat)
-  :config
-  (custom-theme-set-faces
-   'wombat
-   '(default ((t :background "#111111")))
-   '(ansi-color-black ((t :background "#000000")))
-   '(hl-line ((t :inherit () :background "#242424")))))
-
-(use-package modus-themes
-  :init
-  :disabled
-  (load-theme 'modus-operandi-tinted)
-  (load-theme 'modus-vivendi-tinted t t)
-  :config
-  (custom-theme-set-faces
-   'modus-vivendi-tinted
-   '(avy-lead-face ((t :inherit (bold modus-themes-subtle-blue))))
-   '(avy-lead-face-0 ((t :inherit (bold modus-themes-subtle-cyan))))
-   '(avy-lead-face-1 ((t :inherit (bold modus-themes-subtle-green))))
-   '(avy-lead-face-2 ((t :inherit (bold modus-themes-subtle-magenta))))))
-
-(use-package deeper-blue :elpaca nil
-  :init
-  (load-theme 'deeper-blue))
-
-(use-package doom-themes)
-
-(setq alert-default-style 'libnotify)
-
-(use-package all-the-icons
-  :if (display-graphic-p))
-(setq inhibit-compacting-font-caches t)
-(setq use-dialog-box nil)
-(setq display-time-24hr-format t)
-
-(use-package emacs
-  :elpaca nil
-  :defer 5
-  :init
-  (require 'battery)
-  (when (and battery-status-function
-	     (not (string-match-p "unknown"
-				  (battery-format "%B"
-						  (funcall battery-status-function)))))
-    (display-battery-mode 1)))
-(setopt display-time-default-load-average nil)
-
-(display-time-mode 1)
-
-(use-package doom-modeline
-  :ensure t
-  :disabled
-  :init (doom-modeline-mode 1)
-  :config
-  (setq doom-modeline-buffer-encoding 'nondefault))
-
-(use-package emacs
-  :elpaca nil
-  :defer 1
-  :init
-  (defvar kj/minor-mode-alist-overrides
-    '((ws-butler "")
-      (gcmh-mode "")
-      (editorconfig-mode "")
-      (yas-minor-mode "")
-      (selected-minor-mode "")
-      (anzu-mode "")
-      (projectile-mode "")
-      (eldoc-mode "")
-      (mixed-pitch-mode "")
-      (ws-butler-mode "")
-      (which-key-mode "")))
-  (defun kj/clean-mode-line ()
-    (interactive)
-    (dolist (override kj/minor-mode-alist-overrides)
-      (if-let ((e (assoc (car override) minor-mode-alist)))
-          (setf (nth 1 e) (nth 1 override)))))
-  (add-to-list 'change-major-mode-hook 'kj/clean-mode-line))
-
-(use-package emojify
-  :bind
-  (("C-c C-i C-e" . emojify-insert-emoji))
-  :hook (after-init . global-emojify-mode)
-  :config
-  (emojify-set-emoji-styles '(unicode)))
-
-(setq-default show-trailing-whitespace t)
-(dolist (mode '(calendar-mode-hook
-                eshell-mode-hook
-                term-mode-hook
-                comint-mode-hook
-                completion-list-mode))
-  (add-hook mode
-            (defun kj/disable-trailing-whitespace ()
-              (setq show-trailing-whitespace nil))))
-
-;; Deletes trailing whitespace on changed lines only.
-(use-package ws-butler
-  :diminish ws-butler-mode
-  :hook (prog-mode . ws-butler-mode))
-
 ;; `M-x shell` settings
 (setq shell-prompt-pattern "^[^#$%>\n]*[#$%>❯] *"
       explicit-shell-file-name "zsh"
@@ -1055,10 +920,8 @@
                        (gethash 'name (car (gethash 'artists track)))
                        (gethash 'name track))))))))))
 
-;; Enabled commands
-(put 'narrow-to-region 'disabled nil)
-(put 'downcase-region 'disabled nil)
-(put 'upcase-region 'disabled nil)
-(put 'list-timers 'disabled nil)
-
 (provide 'kj-init)
+
+;; Local Variables:
+;; eval: (outline-minor-mode 1)
+;; End: