(gnus-group-highlight-line): Typo fix: beg, not start.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f7ea76e..47e83d5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2010-09-22  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus-group.el (gnus-group-highlight-line): Typo fix: beg, not start.
+
        * gnus-start.el (gnus-get-unread-articles): Don't have
        `gnus-get-unread-articles-in-group' update info, since that can be
        really slow and doesn't seem to be needed?

diff --git a/lisp/gnus-group.el b/lisp/gnus-group.el
index 5e261cc..c17b3a2 100644 (file)
--- a/lisp/gnus-group.el
+++ b/lisp/gnus-group.el
@@ -1671,7 +1671,7 @@ Some value are bound so the form can use them."
         (setq list (cdr list)))
       list)))
 
-(defun gnus-group-highlight-line (group start end)
+(defun gnus-group-highlight-line (group beg end)
   "Highlight the current line according to `gnus-group-highlight'.
 GROUP is current group, and the line to highlight starts at START
 and ends at END."
@@ -1681,9 +1681,9 @@ and ends at END."
     (unless (eq face (get-text-property beg 'face))
       (let ((inhibit-read-only t))
         (gnus-put-text-property-excluding-characters-with-faces
-         start end 'face
+         beg end 'face
          (if (boundp face) (symbol-value face) face)))
-      (gnus-extent-start-open start))))
+      (gnus-extent-start-open beg))))
 
 (defun gnus-group-get-icon (group)
   "Return an icon for GROUP according to `gnus-group-icon-list'."