README.MD

@@ -19,6 +19,6 @@ git clone git@github.com:maciej-szlosarczyk/emacs.git ~/.emacs.d
 And then put the following lines into init.el
 
 ```emacs
-(require 'icejam-custom-init)
+(require '+custom-init "$HOME/.emacs.d/custom-init.el")
 (provide 'init)
 ```

lisp/icejam-company-yasnippet.el

@@ -69,7 +69,7 @@
 (define-key company-active-map (kbd "C-p") 'company-select-previous-or-abort)
 (define-key company-active-map (kbd "C-n") 'company-select-next-or-abort)
 
-(defun icejam/insert-space-and-complete ()
+(defun insert-space-and-complete ()
   "Insert space before trying to complete a section."
   (interactive)
   (save-excursion
@@ -81,11 +81,11 @@
 
 ;;; Yasnippet configuration
 (define-key prog-mode-map (kbd "C-c y") 'company-yasnippet)
-(define-key prog-mode-map (kbd "<f13>") 'icejam/insert-space-and-complete)
+(define-key prog-mode-map (kbd "<f13>") 'insert-space-and-complete)
 (define-key prog-mode-map (kbd "TAB") 'company-indent-or-complete-common)
 
 (define-key text-mode-map (kbd "C-c y") 'company-yasnippet)
-(define-key text-mode-map (kbd "<f13>") 'icejam/insert-space-and-complete)
+(define-key text-mode-map (kbd "<f13>") 'insert-space-and-complete)
 (define-key text-mode-map (kbd "TAB") 'company-indent-or-complete-common)
 
 

lisp/icejam-custom-init.el

@@ -35,8 +35,6 @@
 (add-to-list 'load-path (concat user-emacs-directory "lisp/themes"))
 (add-to-list 'load-path (concat user-emacs-directory "lisp/langs"))
 
-(defgroup :icejam nil "My customisation group.")
-
 ;; General configuration files.
 (require 'icejam-keys-mode)
 (require 'icejam-base)

lisp/icejam-deft.el

@@ -24,5 +24,13 @@
               "\\)")
            deft-auto-save-interval 30.0))
 
+(transient-define-prefix +custom-pkg-deft/menu ()
+ "Start Deft."
+ [""
+ ("d" "Deft" deft)
+ ("q" "quit" keyboard-quit)])
+
+(define-key +custom-keys-mode-map (kbd "C-c d") '+custom-pkg-deft/menu)
+
 (provide 'icejam-deft)
 ;;; icejam-deft.el ends here

lisp/icejam-fonts.el

@@ -12,20 +12,20 @@
 
 ;; Set font face
 ;;;;;;;;;;;;;;;;;;;;;; Font configuration ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-(defun icejam/set-lsp-ui-font-hook ()
+(defun +custom-set-lsp-ui-font-hook ()
-  "Reset LSP IO font to specified icejam-font and icejam-font-size."
+  "Reset LSP IO font to specified +custom-font and +custom-font-size."
   (setq lsp-ui-doc-frame-hook nil)
   (add-hook 'lsp-ui-doc-frame-hook
             (lambda (frame _w)
               (set-face-attribute
                'default frame :font
-               (format "%s %d" icejam-font (- icejam-font-size 2))))))
+               (format "%s %d" +custom-font (- +custom-font-size 2))))))
 
 (defun set-font (name size)
   "Set font to NAME and its SIZE to X pixels."
   (interactive "sNew font: \nnEnter size for %s: ")
-  (setq icejam-font name)
+  (setq +custom-font name)
-  (setq icejam-font-size size)
+  (setq +custom-font-size size)
 
   (set-face-attribute 'default nil :font (format "%s %d" name size))
 
@@ -47,23 +47,23 @@
    'mode-line-inactive nil :font (format "%s %d" name (- size 1)))
 
   ;; Call LSP-UI hook
-  (icejam/set-lsp-ui-font-hook))
+  (+custom-set-lsp-ui-font-hook))
 
-(defvar icejam-font "Iosevka Term")
+(defvar +custom-font "Iosevka Term")
-;; (defvar icejam-font "Monoid")
+;; (defvar +custom-font "Monoid")
-;; (defvar icejam-font "Fira Mono")
+;; (defvar +custom-font "Fira Mono")
-;; (defvar icejam-font "Fira Code")
+;; (defvar +custom-font "Fira Code")
-;; (defvar icejam-font "Red Hat Mono")
+;; (defvar +custom-font "Red Hat Mono")
-;; (defvar icejam-font "Agave Nerd Font Mono")
+;; (defvar +custom-font "Agave Nerd Font Mono")
-;; (defvar icejam-font "Input Mono Condensed")
+;; (defvar +custom-font "Input Mono Condensed")
-;; (defvar icejam-font "SF Mono")
+;; (defvar +custom-font "SF Mono")
-;; (defvar icejam-font "Monaco")
+;; (defvar +custom-font "Monaco")
-;; (defvar icejam-font "JetBrains Mono")
+;; (defvar +custom-font "JetBrains Mono")
-;; (defvar icejam-font "JuliaMono")
+;; (defvar +custom-font "JuliaMono")
-;; (defvar icejam-font "Rec Mono Semicasual")
+;; (defvar +custom-font "Rec Mono Semicasual")
-;; (defvar icejam-font "Victor Mono")
+;; (defvar +custom-font "Victor Mono")
-;; (defvar icejam-font "IBM Plex Mono")
+;; (defvar +custom-font "IBM Plex Mono")
-(defvar icejam-font-size 14)
+(defvar +custom-font-size 14)
 
 (defun set-font-to-screen ()
   "Automatically set font size to suit the monitor."
@@ -73,28 +73,28 @@
   (cond ((eq (x-display-list) nil))
         ;; built-in screen
         ((>= 1050 (x-display-pixel-height))
-         (set-font icejam-font icejam-font-size))
+         (set-font +custom-font +custom-font-size))
 
         ;; 4K screen on a Mac
         ((>= 1080 (x-display-pixel-height))
-         (set-font icejam-font icejam-font-size))
+         (set-font +custom-font +custom-font-size))
 
         ;; Other screens
         ((>= 1120 (x-display-pixel-height))
-         (set-font icejam-font icejam-font-size))
+         (set-font +custom-font +custom-font-size))
 
         ((>= 1440 (x-display-pixel-height))
-         (set-font icejam-font (+ icejam-font-size 3)))
+         (set-font +custom-font (+ +custom-font-size 3)))
 
         ((>= 1920 (x-display-pixel-height))
-         (set-font icejam-font icejam-font-size))
+         (set-font +custom-font +custom-font-size))
 
         ;; 4K screen on Windows or Linux
         ((>= 2160 (x-display-pixel-height))
-         (set-font icejam-font (- icejam-font-size 3)))
+         (set-font +custom-font (- +custom-font-size 3)))
 
         ;; Default
-        (t (set-font icejam-font (- icejam-font-size 3)))))
+        (t (set-font +custom-font (- +custom-font-size 3)))))
 
 ;; Do it automatically on startup
 (set-font-to-screen)
@@ -102,12 +102,12 @@
 (defun set-font-size (size)
   "Set font to a specified SIZE."
   (interactive "nEnter size for font: ")
-  (set-font icejam-font size))
+  (set-font +custom-font size))
 
 (defun set-font-size-for-this-frame (new-size)
   "Set font NEW-SIZE for this frame only."
   (interactive "nEnter new size for font in this frame: ")
-  (set-frame-font (format "%s %d" icejam-font new-size)))
+  (set-frame-font (format "%s %d" +custom-font new-size)))
 
 ;; Remove ugly black line
 (set-face-attribute 'vertical-border nil :foreground

lisp/icejam-ivy.el

@@ -24,17 +24,17 @@
                 ivy-display-style 'fancy ;; Formatting style
                 ))
 
-(define-key icejam-keys-mode-map (kbd "C-c a") 'counsel-rg)
+(define-key +custom-keys-mode-map (kbd "C-c a") 'counsel-rg)
-(define-key icejam-keys-mode-map (kbd "C-c t") 'counsel-find-file)
+(define-key +custom-keys-mode-map (kbd "C-c t") 'counsel-find-file)
-(define-key icejam-keys-mode-map (kbd "C-c C-s") 'swiper) ;; Find things by regexp
+(define-key +custom-keys-mode-map (kbd "C-c C-s") 'swiper) ;; Find things by regexp
-(define-key icejam-keys-mode-map (kbd "M-x") 'counsel-M-x) ;; M-x on steroids
+(define-key +custom-keys-mode-map (kbd "M-x") 'counsel-M-x) ;; M-x on steroids
 
  ;; List all key bindings there are.
-(define-key icejam-keys-mode-map (kbd "<f1> f") 'counsel-describe-function)
+(define-key +custom-keys-mode-map (kbd "<f1> f") 'counsel-describe-function)
-(define-key icejam-keys-mode-map (kbd "<f1> v") 'counsel-describe-variable)
+(define-key +custom-keys-mode-map (kbd "<f1> v") 'counsel-describe-variable)
-(define-key icejam-keys-mode-map (kbd "<f1> l") 'counsel-find-library)
+(define-key +custom-keys-mode-map (kbd "<f1> l") 'counsel-find-library)
-(define-key icejam-keys-mode-map (kbd "<f2> i") 'counsel-info-lookup-symbol)
+(define-key +custom-keys-mode-map (kbd "<f2> i") 'counsel-info-lookup-symbol)
-(define-key icejam-keys-mode-map (kbd "<f2> u") 'counsel-unicode-char)
+(define-key +custom-keys-mode-map (kbd "<f2> u") 'counsel-unicode-char)
 
 (provide 'icejam-ivy)
 ;;; icejam-ivy.el ends here

lisp/icejam-keys-mode.el

@@ -10,47 +10,46 @@
 
 ;;; Code:
 
-(define-minor-mode icejam-keys-mode
+(define-minor-mode +custom-keys-mode
   "Minor mode for all of my personal key bindings."
   :global t
-  :group 'icejam
   :keymap (make-sparse-keymap))
 
 ;; Globally enable my minor mode
-(icejam-keys-mode)
+(+custom-keys-mode)
 
 ;;; Helpful key bindings
-(define-key icejam-keys-mode-map (kbd "C-c \\") 'split-window-right) ;; Split window to the right
+(define-key +custom-keys-mode-map (kbd "C-c \\") 'split-window-right) ;; Split window to the right
-(define-key icejam-keys-mode-map (kbd "C-c /") 'split-window-below) ;; Split window to the bottom
+(define-key +custom-keys-mode-map (kbd "C-c /") 'split-window-below) ;; Split window to the bottom
 
 ;; Move between windows key bindings
-(define-key icejam-keys-mode-map (kbd "C-c <left>") 'windmove-left)
+(define-key +custom-keys-mode-map (kbd "C-c <left>") 'windmove-left)
-(define-key icejam-keys-mode-map (kbd "C-c <right>") 'windmove-right)
+(define-key +custom-keys-mode-map (kbd "C-c <right>") 'windmove-right)
-(define-key icejam-keys-mode-map (kbd "C-c <up>") 'windmove-up)
+(define-key +custom-keys-mode-map (kbd "C-c <up>") 'windmove-up)
-(define-key icejam-keys-mode-map (kbd "C-c <down>") 'windmove-down)
+(define-key +custom-keys-mode-map (kbd "C-c <down>") 'windmove-down)
 
 ;; The same, but without using arrow keys
-(define-key icejam-keys-mode-map (kbd "C-c [") 'windmove-left)
+(define-key +custom-keys-mode-map (kbd "C-c [") 'windmove-left)
-(define-key icejam-keys-mode-map (kbd "C-c ]") 'windmove-right)
+(define-key +custom-keys-mode-map (kbd "C-c ]") 'windmove-right)
-(define-key icejam-keys-mode-map (kbd "C-c {") 'windmove-up)
+(define-key +custom-keys-mode-map (kbd "C-c {") 'windmove-up)
-(define-key icejam-keys-mode-map (kbd "C-c }") 'windmove-down)
+(define-key +custom-keys-mode-map (kbd "C-c }") 'windmove-down)
 
 ;; Kill current buffer and window
-(define-key icejam-keys-mode-map (kbd "C-c q") 'kill-buffer-and-window)
+(define-key +custom-keys-mode-map (kbd "C-c q") 'kill-buffer-and-window)
 
 ;; List buffers
-(define-key icejam-keys-mode-map (kbd "C-c b") 'ibuffer)
+(define-key +custom-keys-mode-map (kbd "C-c b") 'ibuffer)
 
 ;; Revert without asking
-(defun icejam-revert-buffer-no-confirm ()
+(defun revert-buffer-no-confirm ()
   "Revert buffer without confirmation."
   (interactive) (revert-buffer t t))
 
-(define-key icejam-keys-mode-map (kbd "C-c r") 'icejam-revert-buffer-no-confirm)
+(define-key +custom-keys-mode-map (kbd "C-c r") 'revert-buffer-no-confirm)
 
 ;;;;;;;;; Emacs bindings ;;;;;;;;;;;;;;;;;;;;;
-(define-key icejam-keys-mode-map [home] 'beginning-of-line)
+(define-key +custom-keys-mode-map [home] 'beginning-of-line)
-(define-key icejam-keys-mode-map [end] 'end-of-line)
+(define-key +custom-keys-mode-map [end] 'end-of-line)
 
 (provide 'icejam-keys-mode)
 ;;; icejam-keys-mode.el ends here

lisp/icejam-prog-mode.el

@@ -63,7 +63,7 @@
 (setq tab-stop-list (number-sequence tab-width 200 tab-width))
 
 ;; Ensure indentation in steps:
-(defun icejam/set-indent (step)
+(defun set-indent (step)
   "Set indentation to STEP."
   (interactive "NNumber of columns for one step: ")
   (setq-local tab-width step)
@@ -74,14 +74,8 @@
   :defer t
   :config (global-column-enforce-mode t))
 
-;; PCRE to emacs regex translations
+;; Vim-like regex replace with preview in buffer.
-(use-package pcre2el :straight t)
+(use-package visual-regexp :straight t :defer t)
-
-;; Visual regexp
-(use-package visual-regexp-steroids
-  :straight t
-  :requires (pcre2el)
-  :config (setq vr/engine 'pcre2el))
 
 (provide 'icejam-prog-mode)
-;;; icejam-prog-mode.el ends here
+;;; icejam-prog-mode ends here

lisp/icejam-sys-specific.el

@@ -9,7 +9,7 @@
 
 (require 'icejam-keys-mode)
 
-(defun icejam-function-delete-window ()
+(defun +custom-function-delete-window ()
   "Kill a window."
   (interactive) (delete-window))
 
@@ -19,7 +19,7 @@
       (setq mac-option-modifier 'meta)
       (setq mac-command-modifier 'hyper)
 
-      (defun icejam/mac-switch-meta nil
+      (defun mac-switch-meta nil
         "Switch meta between Option and Command."
         (interactive)
         (if (eq mac-option-modifier nil)
@@ -31,27 +31,27 @@
             (setq mac-command-modifier 'meta))))
 
       ;;;;;;;;; Mac binding (fix) ;;;;;;;;;;;;;;;;;;
-      (define-key icejam-keys-mode-map (kbd "H-<right>") 'end-of-line)
+      (define-key +custom-keys-mode-map (kbd "H-<right>") 'end-of-line)
-      (define-key icejam-keys-mode-map (kbd "H-<left>") 'beginning-of-line)
+      (define-key +custom-keys-mode-map (kbd "H-<left>") 'beginning-of-line)
-      (define-key icejam-keys-mode-map (kbd "H-<up>") 'scroll-down) ; WTF is this reverse, I dunno
+      (define-key +custom-keys-mode-map (kbd "H-<up>") 'scroll-down) ; WTF is this reverse, I dunno
-      (define-key icejam-keys-mode-map (kbd "H-<down>") 'scroll-up)
+      (define-key +custom-keys-mode-map (kbd "H-<down>") 'scroll-up)
 
-      (define-key icejam-keys-mode-map [(hyper a)] 'mark-whole-buffer)
+      (define-key +custom-keys-mode-map [(hyper a)] 'mark-whole-buffer)
-      (define-key icejam-keys-mode-map [(hyper v)] 'yank)
+      (define-key +custom-keys-mode-map [(hyper v)] 'yank)
-      (define-key icejam-keys-mode-map [(hyper x)] 'kill-region)
+      (define-key +custom-keys-mode-map [(hyper x)] 'kill-region)
-      (define-key icejam-keys-mode-map [(hyper c)] 'kill-ring-save)
+      (define-key +custom-keys-mode-map [(hyper c)] 'kill-ring-save)
-      (define-key icejam-keys-mode-map [(hyper s)] 'save-buffer)
+      (define-key +custom-keys-mode-map [(hyper s)] 'save-buffer)
-      (define-key icejam-keys-mode-map [(hyper l)] 'goto-line)
+      (define-key +custom-keys-mode-map [(hyper l)] 'goto-line)
-      (define-key icejam-keys-mode-map [(hyper b)] 'treemacs)
+      (define-key +custom-keys-mode-map [(hyper b)] 'treemacs)
-      (define-key icejam-keys-mode-map [(hyper w)] 'icejam-function-delete-window)
+      (define-key +custom-keys-mode-map [(hyper w)] '+custom-function-delete-window)
-      (define-key icejam-keys-mode-map [(hyper z)] 'undo)
+      (define-key +custom-keys-mode-map [(hyper z)] 'undo)
-      (define-key icejam-keys-mode-map [(hyper q)] 'kill-emacs)
+      (define-key +custom-keys-mode-map [(hyper q)] 'kill-emacs)
 
       ;; Disable meta on right alt (useful for Polish characters)
       ;; (setq mac-right-option-modifier nil)
       ))
 
-(defun icejam-switch-right-left-alt ()
+(defun +custom-switch-right-left-alt ()
   "Set keyboard to das keyboard."
   (interactive)
   (if (eq mac-right-option-modifier nil)
@@ -66,38 +66,38 @@
 (if IS-GNU
     (progn
       ;;;; Save and undo
-      (define-key icejam-keys-mode-map (kbd "s-s") 'save-buffer)
+      (define-key +custom-keys-mode-map (kbd "s-s") 'save-buffer)
-      (define-key icejam-keys-mode-map (kbd "s-z") 'undo)
+      (define-key +custom-keys-mode-map (kbd "s-z") 'undo)
-      (define-key icejam-keys-mode-map (kbd "s-a") 'mark-whole-buffer)
+      (define-key +custom-keys-mode-map (kbd "s-a") 'mark-whole-buffer)
 
       ;;;;;;;; Copy and paste bindings ;;;;;;;;;;;;;;;;;;
-      (define-key icejam-keys-mode-map (kbd "s-x") 'kill-region)
+      (define-key +custom-keys-mode-map (kbd "s-x") 'kill-region)
-      (define-key icejam-keys-mode-map (kbd "s-v") 'yank)
+      (define-key +custom-keys-mode-map (kbd "s-v") 'yank)
-      (define-key icejam-keys-mode-map (kbd "s-c") 'kill-ring-save)
+      (define-key +custom-keys-mode-map (kbd "s-c") 'kill-ring-save)
 
       ;;;;;;;;; Linux Ergo bindings (fix) ;;;;;;;;;;;;;;;;;;
-      (define-key icejam-keys-mode-map (kbd "C-<right>") 'end-of-line)
+      (define-key +custom-keys-mode-map (kbd "C-<right>") 'end-of-line)
-      (define-key icejam-keys-mode-map (kbd "C-<left>") 'beginning-of-line)
+      (define-key +custom-keys-mode-map (kbd "C-<left>") 'beginning-of-line)
-      (define-key icejam-keys-mode-map (kbd "C-<up>") 'scroll-down) ; WTF is this reverse, I dunno
+      (define-key +custom-keys-mode-map (kbd "C-<up>") 'scroll-down) ; WTF is this reverse, I dunno
-      (define-key icejam-keys-mode-map (kbd "C-<down>") 'scroll-up)))
+      (define-key +custom-keys-mode-map (kbd "C-<down>") 'scroll-up)))
 
 ;;;;;;;;; BSD-specific config ;;;;;;;;;;;;;;;;;;;;;
 (if IS-BSD
     (progn
-      (define-key icejam-keys-mode-map (kbd "A-<right>") 'end-of-line)
+      (define-key +custom-keys-mode-map (kbd "A-<right>") 'end-of-line)
-      (define-key icejam-keys-mode-map (kbd "A-<left>") 'beginning-of-line)
+      (define-key +custom-keys-mode-map (kbd "A-<left>") 'beginning-of-line)
-      (define-key icejam-keys-mode-map (kbd "A-<up>") 'scroll-down) ; WTF is this reverse, I dunno
+      (define-key +custom-keys-mode-map (kbd "A-<up>") 'scroll-down) ; WTF is this reverse, I dunno
-      (define-key icejam-keys-mode-map (kbd "A-<down>") 'scroll-up)
+      (define-key +custom-keys-mode-map (kbd "A-<down>") 'scroll-up)
 
-      (define-key icejam-keys-mode-map (kbd "A-a") 'mark-whole-buffer)
+      (define-key +custom-keys-mode-map (kbd "A-a") 'mark-whole-buffer)
-      (define-key icejam-keys-mode-map (kbd "A-v") 'yank)
+      (define-key +custom-keys-mode-map (kbd "A-v") 'yank)
-      (define-key icejam-keys-mode-map (kbd "A-x") 'kill-region)
+      (define-key +custom-keys-mode-map (kbd "A-x") 'kill-region)
-      (define-key icejam-keys-mode-map (kbd "A-c") 'kill-ring-save)
+      (define-key +custom-keys-mode-map (kbd "A-c") 'kill-ring-save)
-      (define-key icejam-keys-mode-map (kbd "A-s") 'save-buffer)
+      (define-key +custom-keys-mode-map (kbd "A-s") 'save-buffer)
-      (define-key icejam-keys-mode-map (kbd "A-l") 'goto-line)
+      (define-key +custom-keys-mode-map (kbd "A-l") 'goto-line)
-      (define-key icejam-keys-mode-map (kbd "A-w" '+delete-window)
+      (define-key +custom-keys-mode-map (kbd "A-w" '+delete-window)
-      (define-key icejam-keys-mode-map (kbd "A-z") 'undo)
+      (define-key +custom-keys-mode-map (kbd "A-z") 'undo)
-      (define-key icejam-keys-mode-map (kbd "A-q") 'kill-emacs))))
+      (define-key +custom-keys-mode-map (kbd "A-q") 'kill-emacs))))
 
 (provide 'icejam-sys-specific)
 ;;; icejam-sys-specific.el ends here

lisp/icejam-themes.el

@@ -47,7 +47,7 @@
 (require 'icejam-base16-harmonic-light)
 
 (spaceline-emacs-theme)
-(enable-theme 'icejam-base16-zenburn)
+(enable-theme 'base16-zenburn-modified)
 
 (provide 'icejam-themes)
 ;;; icejam-themes.el ends here

lisp/icejam-transient.el

@@ -4,14 +4,15 @@
 ;;; Code:
 
 (require 'icejam-avy)
+
 (use-package transient :straight t)
 
-(defun icejam-mark-and-indent-whole-buffer ()
+(defun mark-and-indent-whole-buffer ()
   "Mark and indent whole buffer."
   (interactive)
   (indent-region (point-min) (point-max)))
 
-(transient-define-prefix icejam/project-menu ()
+(transient-define-prefix +custom-pkg-transient/project-menu ()
   "Project Commands."
   [""
    ["Projectile"
@@ -36,8 +37,8 @@
     ("d" "deft"                 deft)
     ("T" "Speed Type"           speed-type-text)]])
 
-(transient-define-prefix icejam/code-menu ()
+(transient-define-prefix +custom-pkg-transient/code-menu ()
-  "Code Commands."
+  "Code Commands"
   [""
    ["Manipulate"
     ("c" "Toggle Comment" comment-line)
@@ -53,8 +54,8 @@
     ("u" "Vundo"          vundo)
     ("d" "Dash"           dash-at-point)]])
 
-(transient-define-prefix icejam/window-menu ()
+(transient-define-prefix +custom-pkg-transient/window-menu ()
-  "Windows Commands."
+  "Windows Commands"
   [""
    ["Move"
     ("<left>" " Left"   windmove-left)
@@ -70,24 +71,24 @@
     ""
     ("k" "Kill Buffer"  kill-buffer-and-window)]])
 
-(transient-define-prefix icejam/language-context-menu ()
+(transient-define-prefix +custom-pkg-transient/language-context-menu ()
-  "Language (Buffer) Commands."
+  "Language (Buffer) Commands"
   [""
    ["Buffer"
-    ("r" "Reload"      icejam-revert-buffer-no-confirm)
+    ("r" "Reload"      revert-buffer-no-confirm)
     ("f" "Format"      lsp-format-buffer)
-    ("i" "Indent"      icejam-mark-and-indent-whole-buffer)]
+    ("i" "Indent"      mark-and-indent-whole-buffer)]
    ["Other"
     ("m" "iMenu"       lsp-ui-imenu)
     ("e" "Show Errors" flycheck-list-errors)]])
 
-(transient-define-prefix icejam/history-menu ()
+(transient-define-prefix +custom-pkg-transient/history-menu ()
-  "Buffer History Commands."
+  "Buffer History Commands"
   ["History"
    ("[" "Previous" previous-buffer)
    ("]" "Next" previous-buffer)])
 
-(transient-define-prefix icejam/move-menu ()
+(transient-define-prefix +custom-pkg-transient/move-menu ()
   "Move Commands."
   [""
    ["Move this buffer"
@@ -100,7 +101,7 @@
     ("l" "Character" avy-goto-line)
     ("c" "Line" avy-goto-char-2)]])
 
-(transient-define-prefix icejam/font-menu ()
+(transient-define-prefix +custom-pkg-transient/font-menu ()
   "Font Commands."
   [""
    ["Everywhere"
@@ -111,13 +112,13 @@
     ("d" "Smaller"          (lambda () (interactive) (text-scale-decrease 1)))
     ("r" "Reset"            (lambda () (interactive) (text-scale-adjust 0)))]])
 
-(define-key global-map (kbd "C-c p") 'icejam/project-menu)
+(define-key global-map (kbd "C-c p") '+custom-pkg-transient/project-menu)
-(define-key global-map (kbd "C-c c") 'icejam/code-menu)
+(define-key global-map (kbd "C-c c") '+custom-pkg-transient/code-menu)
-(define-key global-map (kbd "C-c w") 'icejam/window-menu)
+(define-key global-map (kbd "C-c w") '+custom-pkg-transient/window-menu)
-(define-key global-map (kbd "C-c s") 'icejam/history-menu)
+(define-key global-map (kbd "C-c s") '+custom-pkg-transient/history-menu)
-(define-key global-map (kbd "C-c f") 'icejam/font-menu)
+(define-key global-map (kbd "C-c f") '+custom-pkg-transient/font-menu)
-(define-key global-map (kbd "C-c m") 'icejam/move-menu)
+(define-key global-map (kbd "C-c m") '+custom-pkg-transient/move-menu)
-(define-key global-map (kbd "C-c l") 'icejam/language-context-menu)
+(define-key global-map (kbd "C-c l") '+custom-pkg-transient/language-context-menu)
 
 (provide 'icejam-transient)
 ;;; icejam-transient.el ends here

lisp/langs/icejam-lang-clang.el

@@ -4,7 +4,7 @@
 
 (require 'icejam-prog-mode)
 
-(defun icejam-lang-clang/activate-clang-mode ()
+(defun +custom-lang-clang/activate-clang-mode ()
   "Goodies for editing c files."
 
   ;; Set column width to 100
@@ -22,7 +22,7 @@
   (add-to-list (make-local-variable 'company-backends)
                '(company-etags company-yasnippet)))
 
-(add-hook 'c-mode-hook 'icejam-lang-clang/activate-clang-mode)
+(add-hook 'c-mode-hook '+custom-lang-clang/activate-clang-mode)
 
 (provide 'icejam-lang-clang)
 ;;; icejam-lang-clang.el ends here

lisp/langs/icejam-lang-clojure.el

@@ -20,43 +20,43 @@
 	:straight t)
 
 ;; Transient
-(transient-define-prefix icejam-lang-clojure/cider-context-menu ()
+(transient-define-prefix +custom-lang-clojure/cider-context-menu ()
   "Clojure Buffer Commands."
   [""
    ["Cider"
     ("j" "Jack in"     cider-jack-in)
     ("t" "Test"        cider-test-run-loaded-tests)]
    ["Buffer"
-    ("r" "Reload"      icejam-revert-buffer-no-confirm)
+    ("r" "Reload"      revert-buffer-no-confirm)
     ("f" "Format"      cider-format-buffer)
     ("l" "Load"        cider-load-buffer)
     ("e" "Show Errors" flycheck-list-errors)]]
   [""
    ("q"  "Quit"        keyboard-quit)])
 
-(defun icejam-lang-clojure/activate-clojure-mode ()
+(defun +custom-lang-clojure/activate-clojure-mode ()
   "Goodies for clojure files."
-  (icejam/set-indent 2) ;; Default indentation of 2 characters
+  (set-indent 2) ;; Default indentation of 2 characters
   (column-enforce-n 80)
   (clj-refactor-mode 1)
   (cider-mode 1)
   (setq-local indent-tabs-mode nil)
 
   (define-key
-    clojure-mode-map (kbd "C-c l") 'icejam-lang-clojure/cider-context-menu)
+    clojure-mode-map (kbd "C-c l") '+custom-lang-clojure/cider-context-menu)
 
   ;; Do not enable paredit for clojure
   ;; (paredit-mode 1)
 	;; Do not show separate error window when in REPL
   (setq cider-show-error-buffer 'except-in-repl))
 
-(add-hook 'clojure-mode-hook 'icejam-lang-clojure/activate-clojure-mode)
+(add-hook 'clojure-mode-hook '+custom-lang-clojure/activate-clojure-mode)
 
-(defun icejam-lang-clojure/clj-repl-config ()
+(defun +custom-lang-clojure/clj-repl-config ()
   "Do not show stacktrace when in REPL."
 	(setq-local cider-show-error-buffer 'except-in-repl))
 
-(add-hook 'cider-repl-mode-hook 'icejam-lang-clojure/clj-repl-config)
+(add-hook 'cider-repl-mode-hook '+custom-lang-clojure/clj-repl-config)
 (add-hook 'cider-mode-hook #'cider-company-enable-fuzzy-completion)
 
 (provide 'icejam-lang-clojure)

lisp/langs/icejam-lang-dart.el

@@ -7,11 +7,11 @@
 (use-package dart-mode :straight t :defer t)
 (use-package lsp-dart :defer t :straight t :requires (dart-mode lsp))
 
-(defun icejam-lang-dart/activate-dart-mode ()
+(defun +custom-lang-dart/activate-dart-mode ()
   "Reconfigure dart mode for your own purposes."
   (lsp))
 
-(add-hook 'dart-mode-hook 'icejam-lang-dart/activate-dart-mode)
+(add-hook 'dart-mode-hook '+custom-lang-dart/activate-dart-mode)
 
 (provide 'icejam-lang-dart)
 ;;; icejam-lang-dart.el ends here

lisp/langs/icejam-lang-dhall.el

@@ -3,15 +3,14 @@
 ;;; Code:
 
 (require 'icejam-prog-mode)
-(require 'icejam-lsp)
 
 (use-package dhall-mode :straight t :defer t :requires (lsp))
 
-(defun icejam-lang-dhall/activate-dhall-mode ()
+(defun +custom-lang-dhall/activate-dhall-mode ()
   "Reconfigure dhall mode for your own purposes."
   (lsp))
 
-(add-hook 'dhall-mode-hook 'icejam-lang-dhall/activate-dhall-mode)
+(add-hook 'dhall-mode-hook '+custom-lang-dhall/activate-dhall-mode)
 (add-hook 'dhall-mode-hook 'display-line-numbers-mode)
 
 (provide 'icejam-lang-dhall)

lisp/langs/icejam-lang-elisp.el

@@ -4,29 +4,30 @@
 
 (require 'icejam-prog-mode)
 
-(transient-define-prefix icejam/elisp-lang-menu ()
+(transient-define-prefix +custom-lang-elisp/transient-context-menu ()
   "Elisp Buffer Commands."
   [""
    ["Buffer"
-    ("r" "Reload"      icejam-revert-buffer-no-confirm)
+    ("r" "Reload"      revert-buffer-no-confirm)
-    ("i" "Indent"      icejam-mark-and-indent-whole-buffer)
+    ("i" "Indent"      mark-and-indent-whole-buffer)
     ("e" "Show Errors" flycheck-list-errors)]]
   [""
    ("q" "Quit"        keyboard-quit)])
 
-(defun icejam/activate-emacs-lisp-mode ()
+(defun activate-emacs-lisp-mode ()
   "Goodies for editing Emacs files."
-  (icejam/set-indent 2) ;; Default indentation of 2 characters
+  (set-indent 2) ;; Default indentation of 2 characters
   (column-enforce-n 80)
   (setq-default indent-tabs-mode nil)
 
-  (define-key emacs-lisp-mode-map (kbd "C-c l") 'icejam/elisp-lang-menu)
+  (define-key emacs-lisp-mode-map
+              (kbd "C-c l") '+custom-lang-elisp/transient-context-menu)
 
   ;; Company list override
   (add-to-list (make-local-variable 'company-backends)
                '(company-yasnippet company-elisp)))
 
-(add-hook 'emacs-lisp-mode-hook 'icejam/activate-emacs-lisp-mode)
+(add-hook 'emacs-lisp-mode-hook 'activate-emacs-lisp-mode)
 
 (provide 'icejam-lang-elisp)
 ;;; icejam-lang-elisp.el ends here

lisp/langs/icejam-lang-elixir.el

@@ -13,22 +13,22 @@
 (add-to-list 'auto-mode-alist '("\\.ex\\'" . elixir-ts-mode))
 (add-to-list 'auto-mode-alist '("\\.heex\\'" . elixir-ts-mode))
 
-(transient-define-prefix icejam/elixir-lang-menu ()
+(transient-define-prefix +custom-lang-elixir/transient-context-menu ()
   "Elixir Buffer Commands."
   [""
    ["LSP"
     ("m" "iMenu"       lsp-ui-imenu)]
    ["Buffer"
-    ("r" "Reload"      icejam-revert-buffer-no-confirm)
+    ("r" "Reload"      revert-buffer-no-confirm)
     ("f" "Format"      elixir-format)
-    ("i" "Indent"      icejam-mark-and-indent-whole-buffer)
+    ("i" "Indent"      mark-and-indent-whole-buffer)
     ("e" "Show Errors" flycheck-list-errors)]]
   [""
    ("q" "Quit"        keyboard-quit)])
 
-(defun icejam/activate-elixir-ts-mode ()
+(defun +custom-lang-elixir/activate-elixir-ts-mode ()
   "All things Elixir."
-  (icejam/set-indent 2)
+  (set-indent 2)
   (column-enforce-n 98)
   (lsp)
   (setq-local flycheck-check-syntax-automatically '(save mode-enabled))
@@ -38,13 +38,13 @@
   ;; If needed, switch the one below to false to disable documentation pop-ups
   ;; (setq-local lsp-ui-doc-enable t)
 
-  (define-key elixir-ts-mode-map (kbd "C-c l") 'icejam/elixir-lang-menu)
+  (define-key elixir-ts-mode-map (kbd "C-c l") '+custom-lang-elixir/transient-context-menu)
 
   ;; Company list override
   (add-to-list (make-local-variable 'company-backends)
                '(company-capf company-yasnippet)))
 
-(add-hook 'elixir-ts-mode-hook 'icejam/activate-elixir-ts-mode)
+(add-hook 'elixir-ts-mode-hook '+custom-lang-elixir/activate-elixir-ts-mode)
 
 (provide 'icejam-lang-elixir)
 ;;; icejam-lang-elixir.el ends here

lisp/langs/icejam-lang-erlang.el

@@ -56,7 +56,7 @@
    (error line-start (file-name) ":" line ": " (message) line-end))
   :modes (my-erlang-mode))
 
-(defun icejam/activate-erlang-mode ()
+(defun erlang/activate-erlang-mode ()
   "All things for all Erlang, including header files."
   (when (featurep 'erlang-start) (unload-feature 'erlang-start))
 
@@ -74,7 +74,7 @@
                       (plist-get erlang/current-erlang :erlang-path)))
 
   (require 'erlang-start)
-  (icejam/set-indent 4)
+  (set-indent 4)
   (column-enforce-n 80)
 
   ;; Add include path so that Erlang does not complain about
@@ -97,7 +97,7 @@
   ;; Start LSP server
   (lsp))
 
-(add-hook 'erlang-mode-hook 'icejam/activate-erlang-mode)
+(add-hook 'erlang-mode-hook 'erlang/activate-erlang-mode)
 
 (provide 'icejam-lang-erlang)
 ;;; icejam-lang-erlang.el ends here

lisp/langs/icejam-lang-fsharp.el

@@ -18,9 +18,9 @@
   :straight t
   :defer t)
 
-(defun icejam/activate-fsharp-mode ()
+(defun activate-fsharp-mode ()
   "Activate F# goodies."
-  (icejam/set-indent 4)
+  (set-indent 4)
   (column-enforce-n 100)
   (lsp-deferred)
 
@@ -28,7 +28,7 @@
   (add-to-list (make-local-variable 'company-backends)
                '(company-capf company-yasnippet)))
 
-(add-hook 'fsharp-mode-hook 'icejam/activate-fsharp-mode)
+(add-hook 'fsharp-mode-hook 'activate-fsharp-mode)
 
 (provide 'icejam-lang-fsharp)
 ;;; icejam-lang-fsharp.el ends here

lisp/langs/icejam-lang-gleam.el

@@ -19,13 +19,13 @@
               :repo "gleam-lang/gleam-mode"
               :files ("gleam-mode.el" "tree-sitter-gleam")))
 
-(defun icejam-lang-gleam/activate-gleam-mode ()
+(defun +custom-lang-gleam/activate-gleam-mode ()
   "All things Gleam."
-  (icejam/set-indent 2)
+  (set-indent 2)
   (column-enforce-n 100)
   (lsp))
 
-(add-hook 'gleam-mode-hook 'icejam-lang-gleam/activate-gleam-mode)
+(add-hook 'gleam-mode-hook '+custom-lang-gleam/activate-gleam-mode)
 
 (provide 'icejam-lang-gleam)
 ;;; icejam-lang-gleam.el ends here

lisp/langs/icejam-lang-golang.el

@@ -1,4 +1,4 @@
-;;; icejam-lang-golang.el --- summary -*- lexical-binding: t; -*-
+;;; golang.el --- summary -*- lexical-binding: t; -*-
 
 ;; Author: Maciej Szlosarczyk
 ;; Maintainer: Maciej Szlosarczyk
@@ -17,13 +17,12 @@
   :defer t
   :straight t)
 
-(defun icejam/activate-golang-mode ()
+(defun activate-golang-mode ()
-  "Activate my own Golang mode settings."
+  (set-indent 8)
-  (icejam/set-indent 8)
   (column-enforce-n 100)
   (lsp))
 
-(add-hook 'go-mode-hook 'icejam/activate-golang-mode)
+(add-hook 'go-mode-hook 'activate-golang-mode)
 
 (provide 'icejam-lang-golang)
 ;;; icejam-lang-golang.el ends here

lisp/langs/icejam-lang-haskell.el

@@ -21,9 +21,9 @@
   :defer t
   :requires (lsp-mode lsp-ui haskell-mode))
 
-(defun icejam/activate-haskell-mode ()
+(defun activate-haskell-mode ()
   "Run this in haskell-mode."
-  (icejam/set-indent 2)
+  (set-indent 2)
   (column-enforce-n 80)
   (lsp-deferred)
 
@@ -31,7 +31,7 @@
   (add-to-list (make-local-variable 'company-backends)
                '(company-capf company-yasnippet)))
 
-(add-hook 'haskell-mode-hook 'icejam/activate-haskell-mode)
+(add-hook 'haskell-mode-hook 'activate-haskell-mode)
 
 (provide 'icejam-lang-haskell)
 ;;; icejam-lang-haskell.el ends here

lisp/langs/icejam-lang-javascript.el

@@ -20,9 +20,9 @@
 (add-to-list 'auto-mode-alist '("\\.js\\'" . js2-mode))
 (add-to-list 'auto-mode-alist '("\\.json\\'" . js2-mode))
 
-(defun icejam/activate-js2-mode ()
+(defun activate-js2-mode ()
 	"JS2 mode overrides."
-	(icejam/set-indent 2)
+	(set-indent 2)
 
   (when (not (string-match-p ".json" (buffer-file-name)))
     (lsp-deferred))
@@ -41,7 +41,7 @@
   (add-to-list (make-local-variable 'company-backends)
                '(company-capf company-yasnippet)))
 
-(add-hook 'js2-mode-hook 'icejam/activate-js2-mode)
+(add-hook 'js2-mode-hook 'activate-js2-mode)
 
 (provide 'icejam-lang-javascript)
 ;;; icejam-lang-javascript.el ends here

lisp/langs/icejam-lang-kotlin.el

@@ -18,9 +18,9 @@
 	:defer t
 	:straight t)
 
-(defun icejam/activate-kotlin-mode ()
+(defun activate-kotlin-mode ()
   "All things Kotlin."
-  (icejam/set-indent 4)
+  (set-indent 4)
   (column-enforce-n 100)
   (lsp)
 
@@ -28,7 +28,7 @@
   (add-to-list (make-local-variable 'company-backends)
                '(company-capf company-yasnippet)))
 
-(add-hook 'kotlin-mode-hook 'icejam/activate-kotlin-mode)
+(add-hook 'kotlin-mode-hook 'activate-kotlin-mode)
 
 (provide 'icejam-lang-kotlin)
 ;;; icejam-lang-kotlin.el ends here

lisp/langs/icejam-lang-lean.el

@@ -14,7 +14,7 @@
   :requires (lsp)
   :defer t)
 
-(defun icejam/activate-lean-mode ()
+(defun activate-lean-mode ()
   "All things for Lean mode."
   (interactive)
 
@@ -25,7 +25,7 @@
   (add-to-list (make-local-variable 'company-backends)
                '(company-capf company-yasnippet)))
 
-(add-hook 'lean4-mode-hook 'icejam/activate-lean-mode)
+(add-hook 'lean4-mode-hook 'activate-lean-mode)
 
 (provide 'icejam-lang-lean)
 ;;; icejam-lang-lean.el ends here

lisp/langs/icejam-lang-markdown.el

@@ -9,9 +9,9 @@
   :defer t
   :init (setq-default markdown-command "pandoc"))
 
-(defun icejam-lang-markdown/activate-markdown-mode ()
+(defun +custom-lang-markdown/activate-markdown-mode ()
   "Reconfigure markdown mode for your own purposes."
-  (icejam/set-indent 2)
+  (set-indent 2)
   (column-enforce-n 10000)
 
   ;; Markdown mode reuses my bindings, remove them.
@@ -21,7 +21,7 @@
   (define-key markdown-mode-map (kbd "C-c <down>") nil)
   (define-key markdown-mode-map (kbd "C-c C-v") 'markdown-preview))
 
-(add-hook 'markdown-mode-hook 'icejam-lang-markdown/activate-markdown-mode)
+(add-hook 'markdown-mode-hook '+custom-lang-markdown/activate-markdown-mode)
 (add-hook 'markdown-mode-hook 'display-line-numbers-mode)
 
 (provide 'icejam-lang-markdown)

lisp/langs/icejam-lang-ocaml.el

@@ -23,19 +23,19 @@
   :defer t
   :straight t)
 
-(transient-define-prefix icejam-lang-ocaml/context-menu ()
+(transient-define-prefix +custom-lang-ocaml/context-menu ()
   "Ocaml Actions."
   ["OCaml actions"
    [""
-    ("r" "Reload"   icejam-revert-buffer-no-confirm)
+    ("r" "Reload"   revert-buffer-no-confirm)
-    ("i" "Indent"   icejam-mark-and-indent-whole-buffer)]
+    ("i" "Indent"   mark-and-indent-whole-buffer)]
    [""
     ("f" "Format"   ocamlformat)
     ("e" "Opam Env" tuareg-opam-update-env)]]
   [""
    ("q" "Quit"      keyboard-quit)])
 
-(defun icejam/load-ocaml-site-packages ()
+(defun load-ocaml-site-packages ()
   "Generate ocaml config."
   (let ((opam-share (ignore-errors (car (process-lines "opam" "var" "share")))))
     (when (and opam-share (file-directory-p opam-share))
@@ -48,11 +48,11 @@
 
       ;; Use opam switch to lookup ocamlmerlin binary
       (setq merlin-command 'opam)))
-  (define-key tuareg-mode-map (kbd "C-c l") 'icejam-lang-ocaml/context-menu))
+  (define-key tuareg-mode-map (kbd "C-c l") '+custom-lang-ocaml/context-menu))
 
 ;; OCaml setup
 (add-hook 'tuareg-mode-hook 'merlin-mode)
-(add-hook 'tuareg-mode-hook 'icejam/load-ocaml-site-packages)
+(add-hook 'tuareg-mode-hook 'load-ocaml-site-packages)
 (add-hook 'merlin-mode-hook (lambda ()
                               (unbind-key "C-c C-d" merlin-mode-map)
                               (unbind-key "C-c C-l" merlin-mode-map)
@@ -66,12 +66,12 @@
 ;; Use tuareg-opam with lock files
 (add-to-list 'auto-mode-alist '("\\.opam.locked\\'" . tuareg-opam-mode))
 
-(transient-define-prefix icejam-lang-ocaml/reasonml-context-menu ()
+(transient-define-prefix +custom-lang-ocaml/reasonml-context-menu ()
   "ReasonML Actions"
   ["ReasonML actions"
    [""
-    ("r" "Reload"   icejam-revert-buffer-no-confirm)
+    ("r" "Reload"   revert-buffer-no-confirm)
-    ("i" "Indent"   icejam-mark-and-indent-whole-buffer)]
+    ("i" "Indent"   mark-and-indent-whole-buffer)]
    [""
     ("f" "Format"   refmt)
     ("e" "Opam Env" tuareg-opam-update-env)]]
@@ -79,16 +79,16 @@
    ("q" "Quit"      keyboard-quit)])
 
 
-(defun icejam-lang-ocaml/activate-reason-mode ()
+(defun custom-lang-ocaml/activate-reason-mode ()
   "Generate reason config."
   (define-key
-    reason-mode-map (kbd "C-c l") 'icejam-lang-ocaml/reasonml-context-menu))
+    reason-mode-map (kbd "C-c l") '+custom-lang-ocaml/reasonml-context-menu))
 
 ;; Reason setup
 (add-hook 'reason-mode-hook
           (lambda ()
             (add-hook 'before-save-hook #'refmt-before-save)))
-(add-hook 'reason-mode-hook 'icejam-lang-ocaml/activate-reason-mode)
+(add-hook 'reason-mode-hook 'custom-lang-ocaml/activate-reason-mode)
 (add-hook 'reason-mode-hook 'merlin-mode)
 
 (provide 'icejam-lang-ocaml)

lisp/langs/icejam-lang-other.el

@@ -24,11 +24,11 @@
 ;; Yaml
 (use-package yaml-mode :straight t :defer t :requires (lsp))
 
-(defun icejam-lang-yaml/activate-yaml-mode ()
+(defun +custom-lang-yaml/activate-yaml-mode ()
   "Activate yaml-mode."
   (lsp))
 
-(add-hook 'yaml-mode-hook 'icejam-lang-yaml/activate-yaml-mode)
+(add-hook 'yaml-mode-hook '+custom-lang-yaml/activate-yaml-mode)
 
 ;; Other text files
 (use-package json-mode :straight t :defer t)

lisp/langs/icejam-lang-php.el

@@ -18,32 +18,32 @@
   :requires (lsp-mode lsp-ui)
   :straight t)
 
-(transient-define-prefix icejam-lang-php/context-menu ()
+(transient-define-prefix +custom-lang-php/context-menu ()
   "PHP Buffer Commands."
   [""
    ["LSP"
     ("m" "iMenu"       lsp-ui-imenu)]
    ["Buffer"
-    ("r" "Reload"      icejam-revert-buffer-no-confirm)
+    ("r" "Reload"      revert-buffer-no-confirm)
     ("f" "Format"      lsp-format-buffer)
-    ("i" "Indent"      icejam-mark-and-indent-whole-buffer)
+    ("i" "Indent"      mark-and-indent-whole-buffer)
     ("e" "Show Errors" flycheck-list-errors)]]
   [""
    ("q" "Quit"        keyboard-quit)])
 
 
-(defun icejam-lang-php/activate-php-mode ()
+(defun +custom-lang-php/activate-php-mode ()
   "All things php."
-  (icejam/set-indent 4)
+  (set-indent 4)
   (column-enforce-n 80)
 
-  (define-key php-mode-map (kbd "C-c l") 'icejam-lang-php/context-menu)
+  (define-key php-mode-map (kbd "C-c l") '+custom-lang-php/context-menu)
 
   ;; Company list override
   (add-to-list (make-local-variable 'company-backends)
                '(company-capf company-yasnippet)))
 
-(add-hook 'php-mode-hook 'icejam-lang-php/activate-php-mode)
+(add-hook 'php-mode-hook '+custom-lang-php/activate-php-mode)
 
 (provide 'icejam-lang-php)
 ;;; icejam-lang-php.el ends here

lisp/langs/icejam-lang-purescript.el

@@ -13,9 +13,9 @@
   :requires (lsp-mode lsp-ui)
   :straight t)
 
-(defun icejam/activate-purescript-mode ()
+(defun activate-purescript-mode ()
   "All things Purescript."
-  (icejam/set-indent 2)
+  (set-indent 2)
   (column-enforce-n 98)
 
   ;; Purescript indentation
@@ -25,7 +25,7 @@
   (add-to-list (make-local-variable 'company-backends)
                '(company-capf company-yasnippet)))
 
-(add-hook 'purescript-mode-hook 'icejam/activate-purescript-mode)
+(add-hook 'purescript-mode-hook 'activate-purescript-mode)
 
 (provide 'icejam-lang-purescript)
 ;;; icejam-lang-purescript.el ends here

lisp/langs/icejam-lang-python.el

@@ -5,32 +5,32 @@
 (require 'icejam-prog-mode)
 (require 'icejam-transient)
 
-(transient-define-prefix icejam-lang-python/transient-context-menu ()
+(transient-define-prefix +custom-lang-python/transient-context-menu ()
   "Python Buffer Commands."
   [""
    ["LSP"
     ("m" "iMenu"       lsp-ui-imenu)]
    ["Buffer"
-    ("r" "Reload"      icejam-revert-buffer-no-confirm)
+    ("r" "Reload"      revert-buffer-no-confirm)
     ("f" "Format"      lsp-format-buffer)
-    ("i" "Indent"      icejam-mark-and-indent-whole-buffer)
+    ("i" "Indent"      mark-and-indent-whole-buffer)
     ("e" "Show Errors" flycheck-list-errors)]]
   [""
    ("q" "Quit"        keyboard-quit)])
 
 
-(defun icejam-lang-python/activate-python-mode ()
+(defun +custom-lang-python/activate-python-mode ()
   (lsp)
 
   (column-enforce-n 99)
 
-  (define-key python-mode-map (kbd "C-c l") 'icejam-lang-python/transient-context-menu)
+  (define-key python-mode-map (kbd "C-c l") '+custom-lang-python/transient-context-menu)
 
   ;; Company list override
   (add-to-list (make-local-variable 'company-backends)
                '(company-capf company-yasnippet)))
 
-(add-hook 'python-mode-hook 'icejam-lang-python/activate-python-mode)
+(add-hook 'python-mode-hook '+custom-lang-python/activate-python-mode)
 
 (provide 'icejam-lang-python)
 ;;; icejam-lang-python.el ends here

lisp/langs/icejam-lang-ruby.el

@@ -14,9 +14,9 @@
   :straight t
   :defer t)
 
-(defun icejam/activate-ruby-mode ()
+(defun activate-ruby-mode ()
   "All things for ruby mode."
-  (icejam/set-indent 2)
+  (set-indent 2)
 
   ;; Disable reek syntax checking permanently
   (add-to-list (make-local-variable 'flycheck-disabled-checkers) 'ruby-reek 'ruby-rubocop)
@@ -33,7 +33,7 @@
 (add-hook 'enh-ruby-mode-hook 'ruby-end-mode)
 (eval-after-load 'rspec-mode
   '(rspec-install-snippets))
-(add-hook 'enh-ruby-mode-hook 'icejam/activate-ruby-mod)
+(add-hook 'enh-ruby-mode-hook 'activate-ruby-mode)
 ;; (add-hook 'enh-ruby-mode-hook 'lsp-deferred)
 
 (provide 'icejam-lang-ruby)

lisp/langs/icejam-lang-rust.el

@@ -13,10 +13,10 @@
   :defer t
   :requires (rust-mode lsp))
 
-(defun icejam/activate-rust-mode ()
+(defun activate-rust-mode ()
   "All things for Rust mode."
   (interactive)
-  (icejam/set-indent 4)
+  (set-indent 4)
   (column-enforce-n 99)
 
   ;; Run LSP
@@ -26,7 +26,7 @@
   (add-to-list (make-local-variable 'company-backends)
                '(company-capf company-yasnippet)))
 
-(add-hook 'rust-mode-hook 'icejam/activate-rust-mode)
+(add-hook 'rust-mode-hook 'activate-rust-mode)
 (add-hook 'rust-mode-hook 'flycheck-rust-setup)
 
 (provide 'icejam-lang-rust)

lisp/langs/icejam-lang-web.el

@@ -25,7 +25,7 @@
         ("erb"  . (("<%" "%>")
                    ("beg" "end")))))
 
-(defun icejam/activate-web-mode ()
+(defun activate-web-mode ()
 	"Web mode overrides."
 	;; Indent web mode scripts by 2
 	(setq-local web-mode-script-padding 2)
@@ -44,7 +44,7 @@
 	(when (string-match-p ".vue" (buffer-file-name))
 		(lsp)))
 
-(add-hook 'web-mode-hook 'icejam/activate-web-mode)
+(add-hook 'web-mode-hook 'activate-web-mode)
 
 (provide 'icejam-lang-web)
 ;;; icejam-lang-web.el ends here

lisp/langs/icejam-lang-ziglang.el

@@ -13,17 +13,17 @@
 
 (use-package zig-mode :straight t :defer t :requires (lsp))
 
-(defun icejam/activate-zig-mode ()
+(defun activate-zig-mode ()
   "Goodies for editing zig files."
 
   ;; Set column width to 100
   (column-enforce-n 100)
 
   ;; Set indentation to 4 chars
-  (icejam/set-indent 4)
+  (set-indent 4)
   (lsp))
 
-(add-hook 'zig-mode-hook 'icejam/activate-zig-mode)
+(add-hook 'zig-mode-hook 'activate-zig-mode)
 
 (provide 'icejam-lang-ziglang)
 ;;; icejam-lang-ziglang.el ends here

lisp/themes/icejam-base16-harmonic-light.el

@@ -1,4 +1,4 @@
-;;; icejam-base16-harmonic-light-modified.el --- summary
+;;; base16-harmonic-light-modified-theme.el --- summary
 ;;; Commentary:
 
 ;; Author: Maciej Szlosarczyk
@@ -9,7 +9,7 @@
 
 (use-package base16-theme :straight t :defer t)
 
-(defvar icejam-base16-harmonic-light-colors
+(defvar base16-harmonic-light-modified-colors
   '(:base00 "#f7f9fb"
     :base01 "#e5ebf1"
     :base02 "#cbd6e2"
@@ -29,12 +29,12 @@
   "All colors for Base16 Harmonic Light Modified are defined here.")
 
 ;; Define the theme
-(deftheme icejam-base16-harmonic-light)
+(deftheme base16-harmonic-light-modified)
 
 ;; Add all the faces to the theme
-(base16-theme-define 'icejam-base16-harmonic-light icejam-base16-harmonic-light-colors)
+(base16-theme-define 'base16-harmonic-light-modified base16-harmonic-light-modified-colors)
 
 ;; Mark the theme as provided
-(provide-theme 'icejam-base16-harmonic-light)
+(provide-theme 'base16-harmonic-light-modified)
 (provide 'icejam-base16-harmonic-light)
 ;;; icejam-base16-harmonic-light.el ends here

lisp/themes/icejam-base16-zenburn.el

@@ -1,4 +1,4 @@
-;; icejam-base16-zenburn.el -- A base16 colorscheme
+;; base16-zenburn-modified-theme.el -- A base16 colorscheme
 
 ;;; Commentary:
 ;; Base16: (https://github.com/chriskempson/base16)
@@ -17,9 +17,9 @@
 ;; 0B made lighter by 10% #5f7f5f => #799979
 
 
-(use-package base16-theme :straight t)
+(use-package base16-theme :straight t :defer t)
 
-(defvar icejam-base16-zenburn-colors
+(defvar base16-zenburn-modified-colors
   '(:base00 "#383838"
     :base01 "#404040"
     :base02 "#5b5b5b"
@@ -39,12 +39,12 @@
   "All colors for Base16 Zenburn-Modified are defined here.")
 
 ;; Define the theme
-(deftheme icejam-base16-zenburn)
+(deftheme base16-zenburn-modified)
 
 ;; Add all the faces to the theme
-(base16-theme-define 'icejam-base16-zenburn icejam-base16-zenburn-colors)
+(base16-theme-define 'base16-zenburn-modified base16-zenburn-modified-colors)
 
 ;; Mark the theme as provided
-(provide-theme 'icejam-base16-zenburn)
+(provide-theme 'base16-zenburn-modified)
 (provide 'icejam-base16-zenburn)
 ;;; icejam-base16-zenburn.el ends here