Index: openacs-4/packages/dotlrn-ecommerce/www/admin/section-add-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/admin/section-add-edit.tcl,v diff -u -N -r1.6 -r1.7 --- openacs-4/packages/dotlrn-ecommerce/www/admin/section-add-edit.tcl 16 Jul 2005 12:51:06 -0000 1.6 +++ openacs-4/packages/dotlrn-ecommerce/www/admin/section-add-edit.tcl 27 Jul 2005 16:11:51 -0000 1.7 @@ -9,15 +9,22 @@ {return_url "" } {sessions:integer,multiple {}} + section_name:optional } dotlrn_catalog::get_course_data -course_id $course_id set item_id [dotlrn_catalog::get_item_id -revision_id $course_id] -if {[empty_string_p $section_id]} { +if { [ad_form_new_p -key section_id] } { set page_title "Add Section" } else { set page_title "Edit Section" } -set context [list $page_title] \ No newline at end of file +set context [list $page_title] + +if { [info exists section_name] } { + set submitted_p 1 +} else { + set submitted_p 0 +} \ No newline at end of file