Index: openacs-4/packages/calendar/www/view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/calendar/www/view.tcl 17 May 2003 10:21:14 -0000 1.10
+++ openacs-4/packages/calendar/www/view.tcl 26 May 2003 10:00:10 -0000 1.11
@@ -60,15 +60,6 @@
set next_link ">"
}
}
-
- set cal_stuff [calendar::one_day_display \
- -prev_nav_template $previous_link \
- -next_nav_template $next_link \
- -item_template $item_template \
- -hour_template $hour_template \
- -date $date -start_hour 7 -end_hour 22 \
- -calendar_id_list $calendar_list]
-
}
if {$view == "week"} {
@@ -94,15 +85,6 @@
set next_link ">"
}
}
-
- set cal_stuff [calendar::one_week_display \
- -item_template $item_template \
- -day_template "\$day - \$pretty_date ([_ calendar.Add_Item])" \
- -date $date \
- -calendar_id_list $calendar_list \
- -prev_week_template $previous_link \
- -next_week_template $next_link]
-
}
if {$view == "month"} {
@@ -129,14 +111,6 @@
}
}
- set cal_stuff [calendar::one_month_display \
- -item_template "$item_template" \
- -day_template "\$day_number" \
- -date $date \
- -item_add_template "$item_add_template" \
- -calendar_id_list $calendar_list \
- -prev_month_template $previous_link \
- -next_month_template $next_link]
}
if {$view == "list"} {
@@ -145,15 +119,7 @@
set ansi_year [lindex $ansi_list 0]
set ansi_month [string trimleft [lindex $ansi_list 1] "0"]
set ansi_day [string trimleft [lindex $ansi_list 2] "0"]
- set end_date [dt_julian_to_ansi [expr [dt_ansi_to_julian $ansi_year $ansi_month $ansi_day ] + 1]]
- set cal_stuff [calendar::list_display \
- -item_template $item_template \
- -start_date $start_date \
- -end_date $end_date \
- -date $date \
- -calendar_id_list $calendar_list \
- -sort_by $sort_by \
- -url_template "view?view=list&sort_by=\$order_by"]
+ set end_date [dt_julian_to_ansi [expr [dt_ansi_to_julian $ansi_year $ansi_month $ansi_day ] + 31]]
}
set cal_nav [dt_widget_calendar_navigation "view" $view $date "calendar_list="]