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.31.2.1 -r1.31.2.2 --- openacs-4/packages/acs-bootstrap-installer/installer.tcl 13 Mar 2019 10:06:42 -0000 1.31.2.1 +++ openacs-4/packages/acs-bootstrap-installer/installer.tcl 13 Mar 2019 10:06:59 -0000 1.31.2.2 @@ -12,12 +12,12 @@ # Return a header for an installation page, suitable for ns_writing. # This procedure engages the installer mutex, as every installer page is a critical section. -ad_proc -private install_input_widget { +ad_proc -private install_input_widget { {-type ""} {-size 40} {-extra_attributes ""} {-value ""} - param_name + param_name } { Return an HTML input widget for a parameter with an indication of whether the param is mandatory. @@ -27,15 +27,15 @@ if { $value ne "" } { append extra_attributes " value=\"[ns_quotehtml $value]\"" } - + set input_widget "" if { [install_param_mandatory_p $param_name] } { append input_widget " \[*\]" } return $input_widget -} +} ad_proc -private install_param_mandatory_p { param_name } { Return 1 if the given parameter with given name is @@ -321,7 +321,7 @@ } -proc install_back_button_widget {} { +proc install_back_button_widget {} { return [subst {Please try again. \n" - # Some APM procedures use util_memoize, so initialize the cache + # Some APM procedures use util_memoize, so initialize the cache # before starting APM install array set errors {} apm_source [acs_package_root_dir acs-tcl]/tcl/20-memoize-init.tcl errors @@ -468,7 +468,7 @@ ns_write "
At least one core package has an unsatisfied dependency.\ No packages have been installed missing: [lindex $dependency_results 2]. \ Here's what the APM has computed:" - + ns_write "\n