diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cacb9906e91..bc8b384fba5 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2001-01-03  Karl Fogel  <kfogel@red-bean.com>
+
+	* mail/mail-hist.el (mail-hist-text-too-long-p): doc fix.
+
 2001-01-02  Richard M. Stallman  <rms@caffeine.ai.mit.edu>
 
 	* isearch.el (isearch-lazy-highlight-cleanup): Arg now says
diff --git a/lisp/mail/mail-hist.el b/lisp/mail/mail-hist.el
index e37932ecb1a..3cecbba0a55 100644
--- a/lisp/mail/mail-hist.el
+++ b/lisp/mail/mail-hist.el
@@ -189,8 +189,7 @@ If the value is nil, that means no limit on text size."
   :group 'mail-hist)
 
 (defun mail-hist-text-too-long-p (text)
-  "Return t if TEXT does not exceed mail-hist's size limit.
-The variable `mail-hist-text-size-limit' defines this limit."
+  "Return non-nil if TEXT's length exceeds `mail-hist-text-size-limit'."
   (if mail-hist-text-size-limit
       (> (length text) mail-hist-text-size-limit)))