Index: openacs-4/packages/acs-bootstrap-installer/tcl/20-db-bootstrap-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/tcl/20-db-bootstrap-procs.tcl,v diff -u -N -r1.8.10.1 -r1.8.10.2 --- openacs-4/packages/acs-bootstrap-installer/tcl/20-db-bootstrap-procs.tcl 27 Aug 2013 11:01:48 -0000 1.8.10.1 +++ openacs-4/packages/acs-bootstrap-installer/tcl/20-db-bootstrap-procs.tcl 5 Dec 2013 11:05:27 -0000 1.8.10.2 @@ -1,5 +1,5 @@ -ad_proc -private db_available_pools {{} dbn } { +ad_proc -private db_available_pools {dbn} { Returns a list of the available pools for the given database name.

@@ -20,8 +20,7 @@ return [nsv_get {db_available_pools} $dbn] } -ad_proc -private db_pool_to_dbn_init {{ -}} { +ad_proc -private db_pool_to_dbn_init {} { Simply initializes the db_pool_to_dbn nsv, which is used by "db_driverkey -handle". Index: openacs-4/packages/acs-tcl/tcl/apm-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-procs.tcl,v diff -u -N -r1.94.2.12 -r1.94.2.13 --- openacs-4/packages/acs-tcl/tcl/apm-procs.tcl 1 Nov 2013 22:03:28 -0000 1.94.2.12 +++ openacs-4/packages/acs-tcl/tcl/apm-procs.tcl 5 Dec 2013 11:11:17 -0000 1.94.2.13 @@ -415,8 +415,10 @@ return $changed_files } -ad_proc -private apm_mark_version_for_reload { version_id { changed_files_var "" } } { - +ad_proc -private apm_mark_version_for_reload { + version_id + { changed_files_var "" } +} { Examines all tcl_procs files in package version $version_id; if any have changed since they were loaded, marks (in the apm_reload array) that they must be reloaded by each Tcl interpreter (using the @@ -976,11 +978,16 @@ } ad_proc -public apm_parameter_update { - { - -callback apm_dummy_callback - } - parameter_id package_key parameter_name description default_value datatype \ - {section_name ""} {min_n_values 1} {max_n_values 1} + {-callback apm_dummy_callback} + parameter_id + package_key + parameter_name + description + default_value + datatype + {section_name ""} + {min_n_values 1} + {max_n_values 1} } { @return The parameter id that has been updated. } { @@ -1010,12 +1017,17 @@ } ad_proc -public apm_parameter_register { - { - -callback apm_dummy_callback - -parameter_id "" - -scope instance - } - parameter_name description package_key default_value datatype {section_name ""} {min_n_values 1} {max_n_values 1} + {-callback apm_dummy_callback} + {-parameter_id ""} + {-scope instance} + parameter_name + description + package_key + default_value + datatype + {section_name ""} + {min_n_values 1} + {max_n_values 1} } { Register a parameter in the system. @@ -1111,10 +1123,11 @@ } ad_proc -public apm_interface_add { - { - -callback apm_dummy_callback - -interface_id "" - } version_id interface_uri interface_version + {-callback apm_dummy_callback} + {-interface_id ""} + version_id + interface_uri + interface_version } { Add a interface to a version.