Commit 4c78bf9b597c

@@ -57,12 +57,12 @@
   (setq-default custom-safe-themes t)
   (setq-default custom--inhibit-theme-enable nil)
 
-  (defun sbr/before-load-theme (&rest args)
+  (defun vde/before-load-theme (&rest args)
     "Clear existing theme settings instead of layering them.
 Ignores `ARGS'."
     (mapc #'disable-theme custom-enabled-themes))
 
-  (advice-add 'load-theme :before #'sbr/before-load-theme))
+  (advice-add 'load-theme :before #'vde/before-load-theme))
 ;; -UseTheme
 
 ;; UseWindowDivider
@@ -87,7 +87,7 @@ Ignores `ARGS'."
   (setq-default tab-bar-tab-hints nil)
   (setq-default tab-bar-tab-name-function 'tab-bar-tab-name-all)
 
-  (defun sbr/icomplete-tab-bar-tab-dwim ()
+  (defun vde/icomplete-tab-bar-tab-dwim ()
     "Do-What-I-Mean function for getting to a `tab-bar-mode' tab.
 If no other tab exists, create one and switch to it.  If there is
 one other tab (so two in total) switch to it without further
@@ -104,7 +104,7 @@ questions.  Else use completion to select the tab to switch to."
              (tab-bar-switch-to-tab
               (completing-read "Select tab: " tabs nil t))))))
 
-  :bind (("C-x t t" . sbr/icomplete-tab-bar-tab-dwim)
+  :bind (("C-x t t" . vde/icomplete-tab-bar-tab-dwim)
          ("C-x t s" . tab-switcher)))
 ;; -UseTabbar
 

@@ -69,16 +69,16 @@
 
 ;; UseWhitespace
 (use-package whitespace
-  :commands (whitespace-mode sbr/toggle-invisibles)
+  :commands (whitespace-mode vde/toggle-invisibles)
   :config
   (setq-default whitespace-style '(face tabs spaces trailing space-before-tab newline indentation empty space-after-tab space-mark tab-mark newline-mark))
-  (defun sbr/toggle-invisibles ()
+  (defun vde/toggle-invisibles ()
     "Toggles the display of indentation and space characters."
     (interactive)
     (if (bound-and-true-p whitespace-mode)
         (whitespace-mode -1)
       (whitespace-mode)))
-  :bind ("<f6>" . sbr/toggle-invisibles))
+  :bind ("<f6>" . vde/toggle-invisibles))
 ;; -UseWhitespace
 
 ;; UseExpandRegion
@@ -127,13 +127,13 @@
   :hook (prog-mode . display-line-numbers-mode)
   :config
   (setq-default display-line-numbers-type 'relative)
-  (defun sbr/toggle-line-numbers ()
+  (defun vde/toggle-line-numbers ()
     "Toggles the display of line numbers.  Applies to all buffers."
     (interactive)
     (if (bound-and-true-p display-line-numbers-mode)
         (display-line-numbers-mode -1)
       (display-line-numbers-mode)))
-  :bind ("<f7>" . sbr/toggle-line-numbers))
+  :bind ("<f7>" . vde/toggle-line-numbers))
 
 (add-hook 'prog-mode-hook 'toggle-truncate-lines)
 

@@ -92,9 +92,9 @@
 (advice-add #'load-theme :after #'contrib/run-after-load-theme-hook)
 (require 'modus-operandi-theme)
 
-(defun sbr/modus-operandi ()
+(defun vde/modus-operandi ()
   "Enable some Modus Operandi variables and load the theme.
-This is used internally by `sbr/modus-themes-toggle'."
+This is used internally by `vde/modus-themes-toggle'."
   (setq modus-operandi-theme-slanted-constructs t
         modus-operandi-theme-bold-constructs t
         modus-operandi-theme-visible-fringes nil
@@ -111,7 +111,7 @@ This is used internally by `sbr/modus-themes-toggle'."
         modus-operandi-theme-scale-4 1.2)
   (load-theme 'modus-operandi t))
 
-(defun sbr/modus-operandi-custom ()
+(defun vde/modus-operandi-custom ()
   "Customize modus-operandi theme"
   (if (member 'modus-operandi custom-enabled-themes)
       (modus-operandi-theme-with-color-variables ; this macro allows us to access the colour palette
@@ -124,8 +124,8 @@ This is used internally by `sbr/modus-themes-toggle'."
          `(whitespace-indentation ((,class (:background "#ffffff" :foreground "#cccccc"))))
          ))))
 
-(add-hook 'contrib/after-load-theme-hook 'sbr/modus-operandi-custom)
-(sbr/modus-operandi)
+(add-hook 'contrib/after-load-theme-hook 'vde/modus-operandi-custom)
+(vde/modus-operandi)
 
 (defconst font-height 130
   "Default font-height to use.")