1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calendar/time-date.el b/lisp/calendar/time-date.el
index d15312abfa3..4bb2606207a 100644
--- a/lisp/calendar/time-date.el
+++ b/lisp/calendar/time-date.el
@@ -86,7 +86,7 @@ LOW), and type 3 is the list (HIGH LOW MICRO)."
 (defun encode-time-value (high low micro type)
  "Encode HIGH, LOW, and MICRO into a time value of type TYPE.
 Type 0 is the cons cell (HIGH . LOW), type 1 is the list (HIGH LOW),
-and type 3 is the list (HIGH LOW MICRO)."
+and type 2 is the list (HIGH LOW MICRO)."
  (cond
   ((eq type 0) (cons high low))
   ((eq type 1) (list high low))

diff --git a/lisp/calendar/time-date.el b/lisp/calendar/time-date.el index d15312abfa3..4bb2606207a 100644 --- a/lisp/calendar/time-date.el +++ b/lisp/calendar/time-date.el
@@ -86,7 +86,7 @@ LOW), and type 3 is the list (HIGH LOW MICRO)."
86	(defun encode-time-value (high low micro type)	86	(defun encode-time-value (high low micro type)
87	"Encode HIGH, LOW, and MICRO into a time value of type TYPE.	87	"Encode HIGH, LOW, and MICRO into a time value of type TYPE.
88	Type 0 is the cons cell (HIGH . LOW), type 1 is the list (HIGH LOW),	88	Type 0 is the cons cell (HIGH . LOW), type 1 is the list (HIGH LOW),
89	and type 3 is the list (HIGH LOW MICRO)."	89	and type 2 is the list (HIGH LOW MICRO)."
90	(cond	90	(cond
91	((eq type 0) (cons high low))	91	((eq type 0) (cons high low))
92	((eq type 1) (list high low))	92	((eq type 1) (list high low))