From f57c7107727a615e217f1c245c400722c1422870 Mon Sep 17 00:00:00 2001 From: Mark Oteiza Date: Sun, 23 Jul 2017 15:41:51 -0400 Subject: [PATCH] Use a named function for global minor mode turn-on argument * lisp/display-line-numbers.el (turn-on-display-line-numbers-mode): New function. (global-display-line-numbers-mode): Use it. --- lisp/display-line-numbers.el | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) diff --git a/lisp/display-line-numbers.el b/lisp/display-line-numbers.el index 0351fc2871d..d0c1750cf3a 100644 --- a/lisp/display-line-numbers.el +++ b/lisp/display-line-numbers.el @@ -90,14 +90,17 @@ the mode is on, set `display-line-numbers' directly." (remove-hook 'pre-command-hook #'display-line-numbers-update-width t) (setq display-line-numbers nil))) +;;;###autoload +(defun turn-on-display-line-numbers-mode () + "Turn on `display-line-numbers-mode'." + (unless (or (minibufferp) + ;; taken from linum.el + (and (daemonp) (null (frame-parameter nil 'client)))) + (display-line-numbers-mode))) + ;;;###autoload (define-globalized-minor-mode global-display-line-numbers-mode - display-line-numbers-mode - (lambda () - (unless (or (minibufferp) - ;; taken from linum.el - (and (daemonp) (null (frame-parameter nil 'client)))) - (display-line-numbers-mode)))) + display-line-numbers-mode turn-on-display-line-numbers-mode) (provide 'display-line-numbers) -- 2.39.5