Index: openacs-4/packages/acs-api-browser/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/www/index.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/acs-api-browser/www/index.tcl 20 Jul 2006 10:10:31 -0000 1.5 +++ openacs-4/packages/acs-api-browser/www/index.tcl 16 May 2013 08:41:46 -0000 1.6 @@ -25,7 +25,7 @@ if { [info exists about_package_key] } { if { [db_0or1row get_local_package_version_id {} ] } { - rp_form_put version_id $version_id + rp_form_update version_id $version_id rp_internal_redirect package-view } Index: openacs-4/packages/acs-api-browser/www/package-view.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/www/package-view.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/acs-api-browser/www/package-view.tcl 26 Feb 2005 17:52:20 -0000 1.6 +++ openacs-4/packages/acs-api-browser/www/package-view.tcl 16 May 2013 08:41:46 -0000 1.7 @@ -12,6 +12,7 @@ version_id { public_p "" } { kind "procs_files" } + { about_package_key ""} } -properties { title:onevalue context:onevalue @@ -55,7 +56,7 @@ set dimensional_slider "[ad_dimensional \ $dimensional_list \ "" \ - [ad_tcl_vars_to_ns_set version_id kind public_p]]" + [ad_tcl_vars_to_ns_set version_id kind public_p about_package_key]]" switch $kind { procs_files {