Index: openacs-4/packages/calendar/www/view-one-day-display.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view-one-day-display.adp,v diff -u -r1.6 -r1.7 --- openacs-4/packages/calendar/www/view-one-day-display.adp 29 Aug 2003 20:46:43 -0000 1.6 +++ openacs-4/packages/calendar/www/view-one-day-display.adp 4 Sep 2003 20:57:44 -0000 1.7 @@ -4,11 +4,9 @@ @url_previous_week;noquote@ - back one day @dates;noquote@ @url_next_week;noquote@ - forward one day Index: openacs-4/packages/calendar/www/view-one-day-display.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view-one-day-display.tcl,v diff -u -r1.12 -r1.13 --- openacs-4/packages/calendar/www/view-one-day-display.tcl 4 Sep 2003 20:41:00 -0000 1.12 +++ openacs-4/packages/calendar/www/view-one-day-display.tcl 4 Sep 2003 20:57:44 -0000 1.13 @@ -17,8 +17,17 @@ if { ![info exists item_template] } { set item_template "\$item" } -# calendar-portlet +if { ![info exists prev_nav_template] } { + set prev_nav_template {\"back} +} + +if { ![info exists next_nav_template] } { + set next_nav_template {\"forward} +} + +# --calendar-portlet + if { ![info exists start_display_hour] } { set start_display_hour 0 } @@ -186,5 +195,6 @@ set ansi_day [string trimleft [lindex $ansi_list 2] "0"] set julian_date [dt_ansi_to_julian $ansi_year $ansi_month $ansi_day] -set url_previous_week "" -set url_next_week "" +set url_previous_week [subst $prev_nav_template] +set url_next_week [subst $next_nav_template] +