-- /ivy/binding/calendar/CalNuts.mesa
-- to integrate calendar with nuts
-- Last edited by: Binding, August 27, 1984 10:40:43 am PDT
DIRECTORY
Calendar USING [ ZoomLevel],
CalStorage USING [ Mode]
;
CalNuts: CEDAR DEFINITIONS
=
BEGIN
RegisterWithNuts: PRIVATE PROCEDURE;
ResetNutInfo:
PUBLIC PROCEDURE [ zoom: Calendar.ZoomLevel ← unspecified, mode: CalStorage.Mode]
;
-- changing the nut info of calViewer to correspond to the current mode of the calendar.
END.