(mismatch): Doc fix.

2 files changed, 3 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9c32c66bc66..cdc2e283ddd 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2002-01-25  Eli Zaretskii  <eliz@is.elta.co.il>
 
+        * emacs-lisp/cl-seq.el (mismatch): Doc fix.
+
         Support for more than 8 colors on character terminals:
 
         * term/rxvt.el: New file.
diff --git a/lisp/emacs-lisp/cl-seq.el b/lisp/emacs-lisp/cl-seq.el
index bea91dc3098..014bf4786df 100644
--- a/lisp/emacs-lisp/cl-seq.el
+++ b/lisp/emacs-lisp/cl-seq.el
@@ -536,7 +536,7 @@ Keywords supported:  :key :start :end"
 (defun mismatch (cl-seq1 cl-seq2 &rest cl-keys)
   "Compare SEQ1 with SEQ2, return index of first mismatching element.
 Return nil if the sequences match.  If one sequence is a prefix of the
-other, the return value indicates the end of the shorted sequence.
+other, the return value indicates the end of the shorter sequence.
 Keywords supported:  :test :test-not :key :start1 :end1 :start2 :end2 :from-end"
   (cl-parsing-keywords (:test :test-not :key :from-end
                         (:start1 0) :end1 (:start2 0) :end2) ()