Index: openacs-4/packages/dotlrn-ecommerce/lib/tree-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/tree-chunk.tcl,v
diff -u -r1.36 -r1.37
--- openacs-4/packages/dotlrn-ecommerce/lib/tree-chunk.tcl	28 Jul 2005 23:42:47 -0000	1.36
+++ openacs-4/packages/dotlrn-ecommerce/lib/tree-chunk.tcl	3 Aug 2005 06:58:40 -0000	1.37
@@ -247,9 +247,13 @@
 set admin_p [permission::permission_p -object_id $cc_package_id -privilege "admin"]
 
 set actions [list]
+# HAM : View Calendar / View All
+if { [string equal $view "calendar"] } {
+	lappend actions "[_ dotlrn-ecommerce.View_Calendar]" ? "[_ dotlrn-ecommerce.View_Calendar]"
+} else {
+	lappend actions "[_ dotlrn-ecommerce.View_All]" ?view=calendar "[_ dotlrn-ecommerce.View_All]"
+}
 
-lappend actions "[_ dotlrn-ecommerce.View_All]" ? "[_ dotlrn-ecommerce.View_All]"
-
 if { $admin_p } {
     lappend actions "[_ dotlrn-ecommerce.Add_Course]" admin/course-add-edit "[_ dotlrn-ecommerce.Add_Course]"
 }
Index: openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.adp	16 Jul 2005 12:51:06 -0000	1.2
+++ openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.adp	3 Aug 2005 06:58:40 -0000	1.3
@@ -1,7 +1,7 @@
 <table cellpaddin=2 cellspacing=2 border=0>
 	<tr>
 		<td bgcolor="#1958B7">&nbsp;&nbsp;</td><td>Before 12pm</td>
-		<td bgcolor="#FFFD88">&nbsp;&nbsp;</td><td>Between 12pm and 5pm</td>
+		<td bgcolor="#0C3773">&nbsp;&nbsp;</td><td>Between 12pm and 5pm</td>
 		<td bgcolor="#A7C3FE">&nbsp;&nbsp;</td><td>After 5pm</td>
 	</tr>
 </table> 
Index: openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.tcl	16 Jul 2005 12:51:06 -0000	1.2
+++ openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.tcl	3 Aug 2005 06:58:40 -0000	1.3
@@ -224,7 +224,7 @@
     }
 
     if { [lc_time_fmt $ansi_start_date "%H"]  >= 12  && [lc_time_fmt $ansi_start_date "%H"]  <= 17 } {
-        set fontcolor "#FFFD88"
+        set fontcolor "#0C3773"
     }
 
     if { [lc_time_fmt $ansi_start_date "%H"]  > 17 } {
Index: openacs-4/packages/dotlrn-ecommerce/www/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/index.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/dotlrn-ecommerce/www/index.adp	4 Jun 2005 10:05:18 -0000	1.2
+++ openacs-4/packages/dotlrn-ecommerce/www/index.adp	3 Aug 2005 06:58:40 -0000	1.3
@@ -14,4 +14,4 @@
     <div align="right"><a href="admin"><img border=0 src=/dotlrn-catalog/images/admin.gif></a></div>
 </if>
 <if @view@ eq "calendar"><include src="/packages/dotlrn-ecommerce/lib/cal-view" tree_id=@tree_id@></if><else>
-<include src="/packages/dotlrn-ecommerce/lib/tree-chunk" tree_id=@tree_id@></else>
\ No newline at end of file
+<include src="/packages/dotlrn-ecommerce/lib/tree-chunk" tree_id=@tree_id@ view=@view@></else>
\ No newline at end of file
Index: openacs-4/packages/dotlrn-ecommerce/www/admin/course-list.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/admin/course-list.adp,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/dotlrn-ecommerce/www/admin/course-list.adp	3 Aug 2005 06:24:58 -0000	1.4
+++ openacs-4/packages/dotlrn-ecommerce/www/admin/course-list.adp	3 Aug 2005 06:58:40 -0000	1.5
@@ -18,7 +18,7 @@
 </form>
 <br>
 <a class=button href="course-add-edit">#dotlrn-catalog.new_course#</a>
-<br>
+<br><br>
 <listtemplate name=course_list></listtemplate>
 
 <br>