home

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README | LICENSE

commit 4c78bf9b597cda30da83b76951916708b685dc57
parent 65a6ebf9f225761d386568df769a83d1ef2094b2
Author: Vincent Demeester <vincent@sbr.pm>
Date:   Fri, 14 Aug 2020 12:09:51 +0200

tools/emacs: move sbr/ to vde/

Signed-off-by: Vincent Demeester <vincent@sbr.pm>

Diffstat:
Mtools/emacs/config/config-appearance.el | 8++++----
Mtools/emacs/config/config-editing.el | 10+++++-----
Mtools/emacs/early-init.el | 10+++++-----
3 files changed, 14 insertions(+), 14 deletions(-)

diff --git a/tools/emacs/config/config-appearance.el b/tools/emacs/config/config-appearance.el @@ -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 diff --git a/tools/emacs/config/config-editing.el b/tools/emacs/config/config-editing.el @@ -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) diff --git a/tools/emacs/early-init.el b/tools/emacs/early-init.el @@ -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.")