[appt.el] Is this a leftover?

[Leo]

I can't find where new-time-string is used.

diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el
index 7fcaab9..15a9d54 100644
--- a/lisp/calendar/appt.el
+++ b/lisp/calendar/appt.el
@@ -567,7 +567,6 @@ appointment package (if it is not already active)."
               ;; entry begins with a time, add it to the
               ;; appt-time-msg-list.  Then sort the list.
               (let ((entry-list diary-entries-list)
-                    (new-time-string "")
                     time-string)
                 ;; Skip diary entries for dates before today.
                 (while (and entry-list

Leo