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.6 -r1.7 --- openacs-4/packages/dotlrn-ecommerce/lib/cal-view.tcl 3 Aug 2005 09:11:19 -0000 1.6 +++ openacs-4/packages/dotlrn-ecommerce/lib/cal-view.tcl 4 Aug 2005 07:29:05 -0000 1.7 @@ -20,6 +20,15 @@ { groupby course_name } } + +set currently_viewing "Currently Viewing:" + +if { [exists_and_not_null course_type_f] } { append currently_viewing " Course Type"} +if { [exists_and_not_null grade_f] } { append currently_viewing ", Grade"} +if { [exists_and_not_null terms_f] } { append currently_viewing ", Terms"} +if { [exists_and_not_null zone_f] } { append currently_viewing ", Zone"} +if { [exists_and_not_null zone_f] } { append currently_viewing ", Instructor"} + set calendar_id_list [list] set package_id [ad_conn package_id]