2001-01-24 08:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>

	* gnus-score.el (gnus-score-lower-thread): Fix a doc typo.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c778fab..0976332 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2001-01-24 08:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * gnus-score.el (gnus-score-lower-thread): Fix a doc typo.
+
 2001-01-24 12:22:47  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * nntp.el (nntp-wait-for): Return the success code.

diff --git a/lisp/gnus-score.el b/lisp/gnus-score.el
index 92cd168..71a154f 100644 (file)
--- a/lisp/gnus-score.el
+++ b/lisp/gnus-score.el
@@ -1,5 +1,5 @@
 ;;; gnus-score.el --- scoring code for Gnus
-;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000
+;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001
 ;;        Free Software Foundation, Inc.
 
 ;; Author: Per Abrahamsen <amanda@iesd.auc.dk>
@@ -1492,7 +1492,7 @@ EXTRA is the possible non-standard header."
          (gnus-message 5 "Scoring...done"))))))
 
 (defun gnus-score-lower-thread (thread score-adjust)
-  "Lower the socre on THREAD with SCORE-ADJUST.
+  "Lower the score on THREAD with SCORE-ADJUST.
 THREAD is expected to contain a list of the form `(PARENT [CHILD1
 CHILD2 ...])' where PARENT is a header array and each CHILD is a list
 of the same form as THREAD.  The empty list `nil' is valid.  For each
@@ -1750,7 +1750,7 @@ score in GNUS-NEWSGROUP-SCORED by SCORE."
          ;; gnus-score-index is used as a free variable.
          alike last this art entries alist articles
          new news)
-      
+
       ;; Change score file to the adaptive score file.  All entries that
       ;; this function makes will be put into this file.
       (save-excursion
@@ -1760,7 +1760,7 @@ score in GNUS-NEWSGROUP-SCORED by SCORE."
             (gnus-score-file-name
              gnus-newsgroup-name gnus-adaptive-file-suffix))))
 
-      (setq gnus-scores-articles (sort gnus-scores-articles 
+      (setq gnus-scores-articles (sort gnus-scores-articles
                                       'gnus-score-string<)
            articles gnus-scores-articles)
 
@@ -1829,7 +1829,7 @@ score in GNUS-NEWSGROUP-SCORED by SCORE."
                    (push new news)))))
            ;; Update expire date
            (cond ((null date))         ;Permanent entry.
-                 ((and found gnus-update-score-entry-dates) 
+                 ((and found gnus-update-score-entry-dates)
                                        ;Match, update date.
                   (gnus-score-set 'touched '(t) alist)
                   (setcar (nthcdr 2 kill) now))