Commit 11361a8b authored by Stefan Monnier's avatar Stefan Monnier
Browse files

Don't wrap defvar within eval-when-compile.

parent ea682e94
2007-07-27 Stefan Monnier <monnier@iro.umontreal.ca>
* calendar/appt.el: Don't wrap defvar within eval-when-compile.
* calendar/cal-move.el (calendar-scroll-left, calendar-scroll-right)
(calendar-scroll-left-three-months)
(calendar-scroll-right-three-months): Clean up namespace.
......
......@@ -531,9 +531,9 @@ The time should be in either 24 hour format or am/pm format."
(message "")))
(eval-when-compile (defvar number)
(defvar original-date)
(defvar diary-entries-list))
(defvar number)
(defvar original-date)
(defvar diary-entries-list)
;;;###autoload
(defun appt-make-list ()
"Update the appointments list from today's diary buffer.
......@@ -634,7 +634,7 @@ appointment package (if it is not already active)."
(defun appt-sort-list (appt-list)
"Sort an appointment list, putting earlier items at the front.
APPT-LIST is a list of the same format as `appt-time-msg-list'."
(sort appt-list (lambda (e1 e2) (< (caar e1) (caar e2)))))
(sort appt-list (lambda (e1 e2) (< (caar e1) (caar e2)))))
(defun appt-convert-time (time2conv)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment