Mercurial > emacs
changeset 38937:ff93d7955c3d
(hl-line-mode): Don't be a global mode.
(global-hl-line-mode): New definition.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Fri, 24 Aug 2001 11:19:44 +0000 |
parents | 92d48513e134 |
children | 0815e13f099e |
files | lisp/hl-line.el |
diffstat | 1 files changed, 7 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/hl-line.el Fri Aug 24 09:40:55 2001 +0000 +++ b/lisp/hl-line.el Fri Aug 24 11:19:44 2001 +0000 @@ -1,6 +1,6 @@ ;;; hl-line.el --- highlight the current line -;; Copyright (C) 1998, 2000 Free Software Foundation, Inc. +;; Copyright (C) 1998, 2000, 2001 Free Software Foundation, Inc. ;; Author: Dave Love <fx@gnu.org> ;; Created: 1998-09-13 @@ -81,11 +81,10 @@ ;;;###autoload (define-minor-mode hl-line-mode - "Global minor mode to highlight the line about point in the current window. + "Minor mode to highlight the line about point in the current window. With ARG, turn Hl-Line mode on if ARG is positive, off otherwise. Uses functions `hl-line-unhighlight' and `hl-line-highlight' on `pre-command-hook' and `post-command-hook'." - :global t (if hl-line-mode (progn (add-hook 'pre-command-hook #'hl-line-unhighlight) @@ -94,6 +93,11 @@ (remove-hook 'pre-command-hook #'hl-line-unhighlight) (remove-hook 'post-command-hook #'hl-line-highlight))) +;;;###autoload +(easy-mmode-define-global-mode + global-hl-line-mode hl-line-mode hl-line-mode + :group 'hl-line) + (provide 'hl-line) ;;; hl-line.el ends here