Index: openacs-4/packages/acs-bootstrap-installer/installer.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/installer.tcl,v diff -u -r1.24.2.1 -r1.24.2.2 --- openacs-4/packages/acs-bootstrap-installer/installer.tcl 28 Sep 2013 14:09:55 -0000 1.24.2.1 +++ openacs-4/packages/acs-bootstrap-installer/installer.tcl 2 Oct 2013 08:29:06 -0000 1.24.2.2 @@ -45,7 +45,7 @@ } { array set mandatory_params_array [install_mandatory_params] set mandatory_names [array names mandatory_params_array] - return [expr {[lsearch -exact $mandatory_names $param_name] != -1}] + return [expr {$param_name in $mandatory_names}] } ad_proc -private install_mandatory_params {} { @@ -115,7 +115,7 @@ [array names optional_params_array]] foreach param_name $all_param_names { set param_value [ns_set iget $form $param_name] - set mandatory_p [expr {[lsearch -exact $mandatory_params $param_name] != -1}] + set mandatory_p [expr {$param_name in $mandatory_params}] if { $param_value ne "" } { # Param in form - set value in callers scope