Bind free variables when compiling.

diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el
index ae3c74834f838118c8915bc10573de9eed9b1d35..bde6ec48b24f5787373f4982fa737d4d946f2f23 100644 (file)
--- a/lisp/calendar/appt.el
+++ b/lisp/calendar/appt.el
@@ -492,6 +492,9 @@ The time should be in either 24 hour format or am/pm format."
 ;; hold the arguments that list-diary-entries received.
 ;; They specify the range of dates that the diary is being processed for.
 
+(eval-when-compile (defvar number)
+                  (defvar original-date)
+                  (defvar diary-entries-list))
 ;;;###autoload
 (defun appt-make-list ()
   ;; We have something to do if the range of dates that the diary is