diff options
| author | John Paul Wallington | 2006-01-22 08:56:43 +0000 |
|---|---|---|
| committer | John Paul Wallington | 2006-01-22 08:56:43 +0000 |
| commit | a4c6ebf96cb62805bb11de1c8b674daaea68948a (patch) | |
| tree | 7c704834a7e5c524578ba41ff5eec5e8ca731c5d | |
| parent | 120cf413f309242a6c189b6e0fe5f5e079953900 (diff) | |
| download | emacs-a4c6ebf96cb62805bb11de1c8b674daaea68948a.tar.gz emacs-a4c6ebf96cb62805bb11de1c8b674daaea68948a.zip | |
(hl-line-highlight, hl-line-move): Doc fixes.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/hl-line.el | 10 |
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 @@ | |||
| 1 | 2006-01-22 John Paul Wallington <jpw@pobox.com> | ||
| 2 | |||
| 3 | * hl-line.el (hl-line-highlight, hl-line-move): Doc fixes. | ||
| 4 | |||
| 1 | 2006-01-21 Martin Rudalics <rudalics@gmx.at> | 5 | 2006-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. |
| 183 | If `hl-line-range-function' is non-nil, move the OVERLAY to the position | 183 | If `hl-line-range-function' is non-nil, move the OVERLAY to the position |
| 184 | where the function returns. If `hl-line-range-function' is nil, fill | 184 | where the function returns. If `hl-line-range-function' is nil, fill |
| 185 | the line including the point by OVERLAY." | 185 | the 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 |