diff options
Diffstat (limited to '.config')
-rw-r--r-- | .config/emacs/modules/bd--devel.el | 14 | ||||
-rw-r--r-- | .config/emacs/modules/bd--essentials.el | 23 | ||||
-rw-r--r-- | .config/emacs/modules/bd--modeline.el | 2 |
3 files changed, 18 insertions, 21 deletions
diff --git a/.config/emacs/modules/bd--devel.el b/.config/emacs/modules/bd--devel.el index 34d14fc..f395fad 100644 --- a/.config/emacs/modules/bd--devel.el +++ b/.config/emacs/modules/bd--devel.el @@ -1,6 +1,20 @@ ;; -*- lexical-binding: t; -*- +;;;; line numbers +(setopt display-line-numbers-type 'relative) + +(defvar bd/enable-line-numbers-in-hooks + '(prog-mode-hook) + "List of hook symbols to add `display-line-numbers-mode' +to.") + +(mapc + (lambda (hook) + (add-hook hook #'display-line-numbers-mode)) + bd/enable-line-numbers-in-hooks) + + ;;;; general (defun remote-shell () (interactive) diff --git a/.config/emacs/modules/bd--essentials.el b/.config/emacs/modules/bd--essentials.el index cc51202..2054bc3 100644 --- a/.config/emacs/modules/bd--essentials.el +++ b/.config/emacs/modules/bd--essentials.el @@ -13,31 +13,12 @@ ;;;; UI (setopt inhibit-startup-message t) -;; line numbers -(require 'display-line-numbers) -(global-display-line-numbers-mode) -(global-visual-line-mode t) -(setopt display-line-numbers-type 'relative) -(global-hl-line-mode 1) - -(defcustom display-line-numbers-exempt-modes - '(vterm-mode eshell-mode shell-mode term-mode ansi-term-mode image-mode doc-view-mode newsticker-treeview-mode newsticker-treeview-item-mode dired-mode org-agenda-mode) - "Major modes on which to disable line numbers." - :group 'display-line-numbers - :type 'list - :version "green") - -(defun display-line-numbers--turn-on () - "Turn on line numbers except for certain major modes. -Exempt major modes are defined in `display-line-numbers-exempt-modes'." - (unless (or (minibufferp) - (member major-mode display-line-numbers-exempt-modes)) - (display-line-numbers-mode))) - ;;;; defaults ;; basic editing (setopt kill-whole-line t) +(global-hl-line-mode 1) +(global-visual-line-mode t) (defun bd/cleanup-buffer () (interactive) diff --git a/.config/emacs/modules/bd--modeline.el b/.config/emacs/modules/bd--modeline.el index b092081..6bfcca5 100644 --- a/.config/emacs/modules/bd--modeline.el +++ b/.config/emacs/modules/bd--modeline.el @@ -89,6 +89,8 @@ ;;;; emms +(setq emms-mode-line-icon-before-format (format "%s" (all-the-icons-fileicon "owl")) + emms-mode-line-icon-enabled-p t) (defvar-local bd/emms-mode-line '(:eval (when (and (mode-line-window-selected-p) emms-mode-line-string) (format "%s %s" emms-mode-line-string |