[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master f57c710: Use a named function for global minor mode
From: |
Mark Oteiza |
Subject: |
[Emacs-diffs] master f57c710: Use a named function for global minor mode turn-on argument |
Date: |
Sun, 23 Jul 2017 15:44:36 -0400 (EDT) |
branch: master
commit f57c7107727a615e217f1c245c400722c1422870
Author: Mark Oteiza <address@hidden>
Commit: Mark Oteiza <address@hidden>
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 0351fc2..d0c1750 100644
--- a/lisp/display-line-numbers.el
+++ b/lisp/display-line-numbers.el
@@ -91,13 +91,16 @@ the mode is on, set `display-line-numbers' directly."
(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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master f57c710: Use a named function for global minor mode turn-on argument,
Mark Oteiza <=