Index: openacs-4/packages/acs-admin/www/apm/parameter-add-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/parameter-add-2.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/acs-admin/www/apm/parameter-add-2.tcl 10 Sep 2002 22:21:59 -0000 1.3 +++ openacs-4/packages/acs-admin/www/apm/parameter-add-2.tcl 23 May 2003 11:38:33 -0000 1.4 @@ -38,7 +38,7 @@ db_transaction { apm_parameter_register -parameter_id $parameter_id $parameter_name $description $package_key \ $default_value $datatype $section_name $min_n_values $max_n_values - apm_generate_package_spec $version_id + apm_package_install_spec $version_id } on_error { if {![db_string apm_parameter_register_doubleclick_p { select 1 from apm_parameters where parameter_id = :parameter_id Index: openacs-4/packages/acs-admin/www/apm/parameter-edit-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/parameter-edit-2.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/acs-admin/www/apm/parameter-edit-2.tcl 10 Sep 2002 22:21:59 -0000 1.2 +++ openacs-4/packages/acs-admin/www/apm/parameter-edit-2.tcl 23 May 2003 11:38:33 -0000 1.3 @@ -31,7 +31,7 @@ apm_parameter_update $parameter_id $package_key $parameter_name $description \ $default_value $datatype $section_name $min_n_values $max_n_values - apm_generate_package_spec $version_id + apm_package_install_spec $version_id } on_error { ad_return_error "Database Error" "The parameter could not be updated. The database returned the following error:

Index: openacs-4/packages/acs-admin/www/apm/version-callback-add-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/version-callback-add-edit.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/acs-admin/www/apm/version-callback-add-edit.tcl 9 Feb 2003 22:30:15 -0000 1.3 +++ openacs-4/packages/acs-admin/www/apm/version-callback-add-edit.tcl 23 May 2003 11:38:33 -0000 1.4 @@ -75,6 +75,8 @@ } -on_submit { apm_set_callback_proc -type $type -version_id $version_id $proc + + apm_package_install_spec $version_id ad_returnredirect $return_url ad_script_abort