Index: openacs-4/packages/calendar/www/cal-item-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/cal-item-new.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/calendar/www/cal-item-new.tcl 10 Sep 2002 22:22:31 -0000 1.3 +++ openacs-4/packages/calendar/www/cal-item-new.tcl 21 Sep 2002 15:52:43 -0000 1.4 @@ -22,7 +22,7 @@ set calendar_list [calendar::calendar_list] if {[llength $calendar_list] > 1} { - set return_url [ns_urlencode "cal-item-new?date=$date&start_time=$start_time&end_time=$end_time"] + set return_url [ns_urlencode "cal-item-new?date=[ns_urlencode $date]&start_time=$start_time&end_time=$end_time"] ad_returnredirect "calendar-choose?return_url=$return_url" ad_script_abort } Index: openacs-4/packages/calendar/www/view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/calendar/www/view.tcl 10 Sep 2002 22:22:31 -0000 1.6 +++ openacs-4/packages/calendar/www/view.tcl 21 Sep 2002 15:52:43 -0000 1.7 @@ -42,7 +42,7 @@ if {$view == "week"} { set cal_stuff [calendar::one_week_display \ -item_template $item_template \ - -day_template "\$day - \$pretty_date     (Add Item)" \ + -day_template "\$day - \$pretty_date     (Add Item)" \ -date $date \ -calendar_id_list $calendar_list \ -prev_week_template "<" \