aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJohn Paul Wallington2006-01-22 08:56:43 +0000
committerJohn Paul Wallington2006-01-22 08:56:43 +0000
commita4c6ebf96cb62805bb11de1c8b674daaea68948a (patch)
tree7c704834a7e5c524578ba41ff5eec5e8ca731c5d
parent120cf413f309242a6c189b6e0fe5f5e079953900 (diff)
downloademacs-a4c6ebf96cb62805bb11de1c8b674daaea68948a.tar.gz
emacs-a4c6ebf96cb62805bb11de1c8b674daaea68948a.zip
(hl-line-highlight, hl-line-move): Doc fixes.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/hl-line.el10
2 files changed, 9 insertions, 5 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3e73d399844..fa7beddf4d6 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12006-01-22 John Paul Wallington <jpw@pobox.com>
2
3 * hl-line.el (hl-line-highlight, hl-line-move): Doc fixes.
4
12006-01-21 Martin Rudalics <rudalics@gmx.at> 52006-01-21 Martin Rudalics <rudalics@gmx.at>
2 6
3 * emacs-lisp/find-func.el (find-definition-noselect) 7 * emacs-lisp/find-func.el (find-definition-noselect)
diff --git a/lisp/hl-line.el b/lisp/hl-line.el
index 3dd56f2f239..c2d2d293010 100644
--- a/lisp/hl-line.el
+++ b/lisp/hl-line.el
@@ -1,7 +1,7 @@
1;;; hl-line.el --- highlight the current line 1;;; hl-line.el --- highlight the current line
2 2
3;; Copyright (C) 1998, 2000, 2001, 2002, 2003, 2004, 3;; Copyright (C) 1998, 2000, 2001, 2002, 2003, 2004,
4;; 2005 Free Software Foundation, Inc. 4;; 2005, 2006 Free Software Foundation, Inc.
5 5
6;; Author: Dave Love <fx@gnu.org> 6;; Author: Dave Love <fx@gnu.org>
7;; Maintainer: FSF 7;; Maintainer: FSF
@@ -58,7 +58,7 @@
58;; it to nil to avoid highlighting specific buffers, when the global 58;; it to nil to avoid highlighting specific buffers, when the global
59;; mode is used. 59;; mode is used.
60 60
61;; In default whole the line is highlighted. The range of highlighting 61;; By default the whole line is highlighted. The range of highlighting
62;; can be changed by defining an appropriate function as the 62;; can be changed by defining an appropriate function as the
63;; buffer-local value of `hl-line-range-function'. 63;; buffer-local value of `hl-line-range-function'.
64 64
@@ -130,7 +130,7 @@ addition to `hl-line-highlight' on `post-command-hook'."
130 (remove-hook 'pre-command-hook #'hl-line-unhighlight t))) 130 (remove-hook 'pre-command-hook #'hl-line-unhighlight t)))
131 131
132(defun hl-line-highlight () 132(defun hl-line-highlight ()
133 "Active the Hl-Line overlay on the current line." 133 "Activate the Hl-Line overlay on the current line."
134 (if hl-line-mode ; Might be changed outside the mode function. 134 (if hl-line-mode ; Might be changed outside the mode function.
135 (progn 135 (progn
136 (unless hl-line-overlay 136 (unless hl-line-overlay
@@ -179,9 +179,9 @@ Global-Hl-Line mode uses the functions `global-hl-line-unhighlight' and
179 (delete-overlay global-hl-line-overlay))) 179 (delete-overlay global-hl-line-overlay)))
180 180
181(defun hl-line-move (overlay) 181(defun hl-line-move (overlay)
182 "Move the hl-line-mode overlay. 182 "Move the Hl-Line overlay.
183If `hl-line-range-function' is non-nil, move the OVERLAY to the position 183If `hl-line-range-function' is non-nil, move the OVERLAY to the position
184where the function returns. If `hl-line-range-function' is nil, fill 184where the function returns. If `hl-line-range-function' is nil, fill
185the line including the point by OVERLAY." 185the line including the point by OVERLAY."
186 (let (tmp b e) 186 (let (tmp b e)
187 (if hl-line-range-function 187 (if hl-line-range-function