Index: openacs-4/packages/calendar/www/cal-item-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/www/cal-item-new.tcl,v diff -u -r1.33 -r1.34 --- openacs-4/packages/calendar/www/cal-item-new.tcl 13 Aug 2007 05:11:26 -0000 1.33 +++ openacs-4/packages/calendar/www/cal-item-new.tcl 7 Oct 2007 22:36:55 -0000 1.34 @@ -21,12 +21,7 @@ set package_id [ad_conn package_id] set user_id [ad_conn user_id] -set js "" -if { [ns_queryget time_p] != 1 && [ns_queryget start_time] == "" } { - set js "disableTime('cal_item');" -} - if {![info exists item_type_id]} { set item_type_id "" } @@ -36,6 +31,17 @@ set calendar_list [calendar::calendar_list] set calendar_options [calendar::calendar_list -privilege create] +# To be replaced by a call to template::head API +if {![template::multirow exists link]} { + template::multirow create link rel type href title lang media +} +template::multirow append link \ + stylesheet \ + "text/css" \ + "/resources/calendar/calendar.css" \ + "" \ + en \ + "all" # TODO: Move into ad_form if { ![ad_form_new_p -key cal_item_id] } { @@ -49,10 +55,10 @@ } # TODO: Move into ad_form if { [exists_and_not_null cal_item_id] } { - set page_title "One calendar item" + set page_title [_ calendar.Calendar_Edit_Item] set ad_form_mode display } else { - set page_title "Add a calendar item" + set page_title [_ calendar.Calendar_Add_Item] set ad_form_mode edit }