Index: openacs-4/packages/calendar/www/view-list-display.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/view-list-display.tcl,v
diff -u -r1.28 -r1.28.2.1
--- openacs-4/packages/calendar/www/view-list-display.tcl	15 May 2007 20:14:21 -0000	1.28
+++ openacs-4/packages/calendar/www/view-list-display.tcl	10 Oct 2008 13:08:00 -0000	1.28.2.1
@@ -113,10 +113,7 @@
     end_time \
     today \
     description \
-    name_style_class \
-    description_style_class \
-    container_style_class \
-    event_print_url
+    calendar_name
 
 set last_pretty_start_date ""
 # Loop through the events, and add them
@@ -143,11 +140,11 @@
 
     # Localize
     set pretty_weekday [lc_time_fmt $ansi_start_date "%A"]
-    set pretty_start_date [lc_time_fmt $ansi_start_date "%x"]
-    set pretty_end_date [lc_time_fmt $ansi_end_date "%x"]
+    set pretty_start_date [lc_time_fmt $ansi_start_date "%Q"]
+    set pretty_end_date [lc_time_fmt $ansi_end_date "%Q"]
     set pretty_start_time [lc_time_fmt $ansi_start_date "%X"]
     set pretty_end_time [lc_time_fmt $ansi_end_date "%X"]
-    set pretty_today [lc_time_fmt $ansi_today "%x"]
+    set pretty_today [lc_time_fmt $ansi_today "%Q"]
 
     set start_date_seconds [clock scan [lc_time_fmt $ansi_start_date "%Y-%m-%d"]]
     set today_seconds [clock scan [lc_time_fmt $ansi_today "%Y-%m-%d"]]
@@ -191,6 +188,10 @@
         set url_stub $url_stubs($calendar_id)
     }
     
+    if { !$show_calendar_name_p } {
+        set calendar_name ""
+    }
+
     multirow append items \
 	$name \
 	[subst $event_url_template] \
@@ -203,12 +204,39 @@
 	$pretty_end_time \
 	$today \
     $description \
-    "calendar-ItemListName" \
-    "calendar-ItemListDescription" \
-    "calendar-ItemListContainer" \
-    "[subst $event_url_template]&export=print"
+        $calendar_name
 }
 
+template::list::create -name "items-list" -multirow items -no_data [_ calendar.No_Items] -caption $title -elements {
+    start_date {
+        label "[_ calendar.Date_1]"
+    }
+    time {
+        label "[_ calendar.Time_1]"
+        display_template {
+              <if @items.start_time@ ne @items.end_time@>
+                @items.start_time@ &ndash; @items.end_time@
+              </if>
+              <else>
+                #calendar.All_Day_Event#
+              </else>
+        }
+    }
+    event {
+        label "[_ calendar.Event]"
+        display_col event_name
+        link_url_col event_url
+        link_html {title "#calendar.goto_items_event_name#"}
+    }
+    calendar {
+        label "[_ calendar.Calendar]"
+        display_col calendar_name
+    }
+    description {
+        label "[_ calendar.Description]"
+    }
+}
+
 set start_year [lc_time_fmt $start_date "%Y"]
 set start_month [lc_time_fmt $start_date "%B"]
 set start_day [lc_time_fmt $start_date "%d"]
@@ -245,11 +273,11 @@
     }
 
 
-ad_form -name frmdays -has_submit 1 -html {style float:right} -export $noprocessing_vars -form {
+ad_form -name frmdays -has_submit 1 -html {class "inline-form"} -export $noprocessing_vars -form {
     {period_days:integer,optional
         {label ""}
         {html {size 3} {maxlength 3} {class "cal-input-field"}}
         {value "$period_days"}
         {after_html "[_ calendar.days]"}
     }
-} -on_submit { }
\ No newline at end of file
+} -on_submit { }