mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

(hl-line-highlight, hl-line-move): Doc fixes.

Browse Source
This commit is contained in:
John Paul Wallington 2006-01-22 08:56:43 +00:00
parent 120cf413f3
commit a4c6ebf96c
2 changed files with 9 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,3 +1,7 @@
2006-01-22 John Paul Wallington <jpw@pobox.com>
* hl-line.el (hl-line-highlight, hl-line-move): Doc fixes.
2006-01-21 Martin Rudalics <rudalics@gmx.at>
* emacs-lisp/find-func.el (find-definition-noselect)

10
lisp/hl-line.el
View File

@ -1,7 +1,7 @@
;;; hl-line.el --- highlight the current line
;; Copyright (C) 1998, 2000, 2001, 2002, 2003, 2004,
;; 2005 Free Software Foundation, Inc.
;; 2005, 2006 Free Software Foundation, Inc.
;; Author: Dave Love <fx@gnu.org>
;; Maintainer: FSF
@ -58,7 +58,7 @@
;; it to nil to avoid highlighting specific buffers, when the global
;; mode is used.
;; In default whole the line is highlighted. The range of highlighting
;; By default the whole line is highlighted. The range of highlighting
;; can be changed by defining an appropriate function as the
;; buffer-local value of `hl-line-range-function'.
@ -130,7 +130,7 @@ addition to `hl-line-highlight' on `post-command-hook'."
(remove-hook 'pre-command-hook #'hl-line-unhighlight t)))
(defun hl-line-highlight ()
"Active the Hl-Line overlay on the current line."
"Activate the Hl-Line overlay on the current line."
(if hl-line-mode ; Might be changed outside the mode function.
(progn
(unless hl-line-overlay
@ -179,9 +179,9 @@ Global-Hl-Line mode uses the functions `global-hl-line-unhighlight' and
(delete-overlay global-hl-line-overlay)))
(defun hl-line-move (overlay)
"Move the hl-line-mode overlay.
"Move the Hl-Line overlay.
If `hl-line-range-function' is non-nil, move the OVERLAY to the position
where the function returns. If `hl-line-range-function' is nil, fill
where the function returns. If `hl-line-range-function' is nil, fill
the line including the point by OVERLAY."
(let (tmp b e)
(if hl-line-range-function