Index: openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl,v diff -u -r1.15 -r1.16 --- openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl 10 Oct 2003 09:50:44 -0000 1.15 +++ openacs-4/packages/acs-subsite/tcl/subsite-procs.tcl 21 Oct 2003 20:19:11 -0000 1.16 @@ -640,7 +640,7 @@ set master_template_options [list] lappend master_template_options [list "Default" "/www/default-master"] lappend master_template_options [list "Community" "/packages/acs-subsite/www/group-master"] - set current_master [parameter::get -parameter DefaultTemplate -package_id [ad_conn subsite_id]] + set current_master [parameter::get -parameter DefaultMaster -package_id [ad_conn subsite_id]] set found_p 0 foreach elm $master_template_options { if { [string equal $current_master [lindex $elm 1]] } { @@ -649,7 +649,7 @@ } } if { !$found_p } { - lappend master_template [list $current_master $current_master] + lappend master_template_options [list $current_master $current_master] } return $master_template_options }