Index: openacs-4/packages/dotlrn-ecommerce/www/admin/email-template.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/admin/email-template.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/dotlrn-ecommerce/www/admin/email-template.tcl 11 Aug 2005 03:04:21 -0000 1.4 +++ openacs-4/packages/dotlrn-ecommerce/www/admin/email-template.tcl 16 Aug 2005 02:30:54 -0000 1.5 @@ -47,14 +47,18 @@ } -set title "Add/edit email template" -if {![exists_and_not_null community_id]} { - #if section_id is empty community_id will be empty too - set community_id [db_string get_community_id { - select community_id - from dotlrn_ecommerce_section - where section_id = :section_id - } -default ""] +set title "Add/edit default email template" +set section_id [db_string get_section_id { + select section_id + from dotlrn_ecommerce_section + where community_id=:community_id +} -default ""] + +if {$community_id ne ""} { + set title "Add/edit Course default email template" } +if {$section_id ne ""} { + set title "Add/edit Section email template" +} set extra_vars [list [list action $action] [list section_id $section_id]] \ No newline at end of file