From c5f28799272fd7376bc61f6a98abec5a5e2a3b08 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sat, 10 Jun 2017 01:54:59 +0200 Subject: [PATCH] core-ui: optimize hooks --- core/core-ui.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/core/core-ui.el b/core/core-ui.el index a2ae12e79..f76a7401c 100644 --- a/core/core-ui.el +++ b/core/core-ui.el @@ -135,7 +135,7 @@ mode is detected.") (push (cons 'left-fringe doom-ui-fringe-size) default-frame-alist) (push (cons 'right-fringe doom-ui-fringe-size) default-frame-alist) ;; no fringe in the minibuffer - (add-hook! (emacs-startup minibuffer-setup) + (add-hook! '(emacs-startup-hook minibuffer-setup-hook) (set-window-fringes (minibuffer-window) 0 0 nil))) @@ -256,9 +256,10 @@ file." (defvar linum-format "%3d ") (defvar nlinum-format "%4d ") :init - (add-hook! (prog-mode text-mode) + (defun doom|init-nlinum-mode () (unless (eq major-mode 'org-mode) (nlinum-mode +1))) + (add-hook! (prog-mode text-mode) #'doom|init-nlinum-mode) :config (setq nlinum-highlight-current-line t) @@ -291,10 +292,11 @@ file." (advice-add #'nlinum--region :override #'doom*nlinum-region) ;; Optimization: calculate line number column width beforehand - (add-hook! nlinum-mode + (defun doom|init-nlinum-width () (setq nlinum--width (length (save-excursion (goto-char (point-max)) - (format-mode-line "%l")))))) + (format-mode-line "%l"))))) + (add-hook 'nlinum-mode-hook #'doom|init-nlinum-width)) ;; Helps us distinguish stacked delimiter pairs. Especially in parentheses-drunk ;; languages like Lisp.