Mercurial > emacs

comparison lisp/hl-line.el @ 25051:64e3159f0c7b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(hl-line-mode): Add autload cookies.
author Dave Love <fx@gnu.org>
date Fri, 23 Jul 1999 23:01:06 +0000
parents 4d9ce81656da
children caaa177b2390
comparison
equal deleted inserted replaced
25050:1539c0070dd3 25051:64e3159f0c7b
46 46
47 ;;; Code: 47 ;;; Code:
48 48
49 (defgroup hl-line nil 49 (defgroup hl-line nil
50 "Highliight the current line." 50 "Highliight the current line."
51 :version "20.5"
51 :group 'editing) 52 :group 'editing)
52 53
54 ;;;###autoload
53 (defcustom hl-line-mode nil 55 (defcustom hl-line-mode nil
54 "Non-nil if Hl-Line mode is enabled." 56 "Non-nil if Hl-Line mode is enabled."
55 :set (lambda (symbol value) 57 :set (lambda (symbol value)
56 (hl-line-mode (or value 0))) 58 (hl-line-mode (or value 0)))
57 :initialize 'custom-initialize-default 59 :initialize 'custom-initialize-default
81 (defun hl-line-unhighlight () 83 (defun hl-line-unhighlight ()
82 "Deactivate the Hl-Line overlay on the current line in the current window." 84 "Deactivate the Hl-Line overlay on the current line in the current window."
83 (if hl-line-overlay 85 (if hl-line-overlay
84 (delete-overlay hl-line-overlay))) 86 (delete-overlay hl-line-overlay)))
85 87
88 ;;;###autoload
86 (defun hl-line-mode (&optional arg) 89 (defun hl-line-mode (&optional arg)
87 "Global minor mode to highlight the line about point. 90 "Global minor mode to highlight the line about point.
88 91
89 With ARG, turn Hl-Line mode on if ARG is positive, off otherwise. 92 With ARG, turn Hl-Line mode on if ARG is positive, off otherwise.
90 Only useful with a windowing system. 93 Only useful with a windowing system.