summaryrefslogtreecommitdiff
path: root/.config/emacs
diff options
context:
space:
mode:
Diffstat (limited to '.config/emacs')
-rw-r--r--.config/emacs/modules/bd--devel.el14
-rw-r--r--.config/emacs/modules/bd--essentials.el23
-rw-r--r--.config/emacs/modules/bd--modeline.el2
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