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 -N -r1.31 -r1.32 --- openacs-4/packages/calendar/www/view-one-day-display.tcl 13 Jan 2005 13:56:30 -0000 1.31 +++ openacs-4/packages/calendar/www/view-one-day-display.tcl 11 May 2005 17:53:44 -0000 1.32 @@ -85,6 +85,7 @@ set day_current_hour 0 set localized_day_current_hour "" +set localized_date_current "" set item_add_without_time [subst $hour_template] # Now items with time @@ -94,6 +95,7 @@ calendar_name \ status_summary \ add_url \ + add_title \ localized_current_hour \ current_hour \ start_time \ @@ -159,23 +161,26 @@ for { } { $day_current_hour < $item_start_hour } { incr day_current_hour } { set localized_day_current_hour [lc_time_fmt "$current_date $day_current_hour:00:00" "%X"] + set localized_date_current [lc_time_fmt "$current_date $day_current_hour:00:00" "%x"] multirow append items \ "" \ "" \ "" \ "" \ [subst $hour_template] \ + "[_ calendar.Add_item_beginning_at]" \ $localized_day_current_hour \ $day_current_hour \ 0 \ 0 \ "" \ - "" + "" } } set day_current_hour [lindex $this_item 0] set localized_day_current_hour [lc_time_fmt "$current_date $day_current_hour:00:00" "%X"] + set localized_date_current [lc_time_fmt "$current_date $day_current_hour:00:00" "%x"] # reset url stub set url_stub "" @@ -203,6 +208,7 @@ [lindex $this_item 3] \ [lindex $this_item 4] \ $current_hour_link \ + "[_ calendar.Add_item_beginning_at]" \ $localized_day_current_hour \ $day_current_hour \ [lindex $this_item 7] \ @@ -217,12 +223,14 @@ # need to add dummy entries to show all hours for { } { $day_current_hour < $end_display_hour } { incr day_current_hour } { set localized_day_current_hour [lc_time_fmt "$current_date $day_current_hour:00:00" "%X" [ad_conn locale]] + set localized_date_current [lc_time_fmt "$current_date $day_current_hour:00:00" "%x" [ad_conn locale]] multirow append items \ "" \ "" \ "" \ "" \ "[subst $hour_template]" \ + "[_ calendar.Add_item_beginning_at]" \ $localized_day_current_hour \ $day_current_hour \ "" \