Index: openacs-4/packages/dotlrn-ecommerce/lib/cal-view.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/cal-view.adp,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn-ecommerce/lib/cal-view.adp 19 Jun 2005 06:05:06 -0000 1.3 +++ openacs-4/packages/dotlrn-ecommerce/lib/cal-view.adp 3 Aug 2005 08:30:10 -0000 1.4 @@ -16,7 +16,7 @@ -

View All

+

View All

Index: openacs-4/packages/dotlrn-ecommerce/lib/cal-view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/cal-view.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn-ecommerce/lib/cal-view.tcl 4 Jul 2005 14:28:32 -0000 1.4 +++ openacs-4/packages/dotlrn-ecommerce/lib/cal-view.tcl 3 Aug 2005 08:30:10 -0000 1.5 @@ -10,6 +10,7 @@ instructor:optional { level "" } { date "" } + { view "calendar" } { orderby course_name } { groupby course_name } 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.37 -r1.38 --- openacs-4/packages/dotlrn-ecommerce/lib/tree-chunk.tcl 3 Aug 2005 06:58:40 -0000 1.37 +++ openacs-4/packages/dotlrn-ecommerce/lib/tree-chunk.tcl 3 Aug 2005 08:30:10 -0000 1.38 @@ -247,13 +247,9 @@ 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.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.tcl 3 Aug 2005 07:11:37 -0000 1.4 +++ openacs-4/packages/dotlrn-ecommerce/lib/view-month-display.tcl 3 Aug 2005 08:30:10 -0000 1.5 @@ -215,10 +215,7 @@ } else { set day_link "" } - ns_log Notice "$ansi_start_time" -ns_log Notice "*** [lc_time_fmt $ansi_start_date '%H'] ***" - if { [lc_time_fmt $ansi_start_date "%H"] < 12 } { set fontcolor "#1958B7" } @@ -231,8 +228,6 @@ set fontcolor "#A7C3FE" } -ns_log Notice " **** $fontcolor ****" - multirow append items \ $name \ [subst $item_template] \