From: Mark Oteiza <mvoteiza@udel.edu>
Date: Sun, 23 Jul 2017 19:41:51 +0000 (-0400)
Subject: Use a named function for global minor mode turn-on argument
X-Git-Tag: emacs-26.0.90~518^2~13
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f57c7107727a615e217f1c245c400722c1422870;p=emacs.git

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.
---

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)