Index: openacs-4/packages/acs-admin/lib/service-parameters.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/lib/service-parameters.tcl,v diff -u -r1.12.2.1 -r1.12.2.2 --- openacs-4/packages/acs-admin/lib/service-parameters.tcl 1 Nov 2022 16:06:52 -0000 1.12.2.1 +++ openacs-4/packages/acs-admin/lib/service-parameters.tcl 8 Nov 2022 14:02:12 -0000 1.12.2.2 @@ -12,6 +12,7 @@ } set user_id [ad_conn user_id] +set return_url [ad_return_url] set swadmin_p 0 db_multirow -extend { url admin_url param_url sitewide_admin_url} packages services_select { select package_id, @@ -44,7 +45,7 @@ } } if { $parameter_count > 0 } { - set param_url [export_vars -base "/shared/parameters" { package_id { return_url {[ad_return_url]} } }] + set param_url [export_vars -base "/shared/parameters" {package_id return_url}] } set instance_name [lang::util::localize $instance_name]