]> git.eshelyaron.com Git - emacs.git/commitdiff
Use a named function for global minor mode turn-on argument
authorMark Oteiza <mvoteiza@udel.edu>
Sun, 23 Jul 2017 19:41:51 +0000 (15:41 -0400)
committerMark Oteiza <mvoteiza@udel.edu>
Sun, 23 Jul 2017 19:41:51 +0000 (15:41 -0400)
* 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

index 0351fc2871dcb12fd18fdcd938727f3e5385c5ec..d0c1750cf3a6b2e93fc2ed24c371abf7642b2e7a 100644 (file)
@@ -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)