Index: openacs-4/packages/calendar/tcl/calendar-display-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/Attic/calendar-display-procs.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/calendar/tcl/calendar-display-procs.tcl	1 Apr 2002 23:46:18 -0000	1.12
+++ openacs-4/packages/calendar/tcl/calendar-display-procs.tcl	11 Apr 2002 19:58:12 -0000	1.13
@@ -129,6 +129,8 @@
         {-calendar_id_list ""}
         {-hour_template {$hour}}
         {-item_template {$item}}
+        {-prev_nav_template {<a href="?date=$yesterday">&lt;</a>}}
+        {-next_nav_template {<a href="?date=$tomorrow">&gt;</a>}}
         {-start_hour 0}
         {-end_hour 23}
     } {
@@ -194,6 +196,8 @@
         set hour_template [subst $hour_template]
         
         return [dt_widget_day -hour_template $hour_template \
+                -prev_nav_template $prev_nav_template \
+                -next_nav_template $next_nav_template \
                 -start_hour $widget_start_hour -end_hour $widget_end_hour \
                 -calendar_details $items -date $date -overlap_p 1]