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 -r1.13 --- openacs-4/packages/acs-admin/lib/service-parameters.tcl 3 Nov 2018 19:42:55 -0000 1.12 +++ openacs-4/packages/acs-admin/lib/service-parameters.tcl 3 Sep 2024 15:37:29 -0000 1.13 @@ -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] @@ -72,23 +73,23 @@ label "\#acs-admin.Administration\#" link_url_col admin_url link_html { title "\#acs-admin.Service_administration\#" } - display_template {\#acs-admin.Administration\#} - html {align left} + display_template { #acs-admin.Administration#} + html {align left style "white-space: nowrap;"} } sitewide_admin { label "\#acs-admin.Site-Wide_Admin\#" link_url_col sitewide_admin_url link_html { title "\#acs-admin.Service_administration\#" } - display_template {\#acs-admin.Administration\#} + display_template { #acs-admin.Administration#} hide_p {[string is false $swadmin_p]} - html {align left} + html {align left style "white-space: nowrap;"} } parameters { label "\#acs-admin.Parameters\#" link_url_col param_url link_html { title "\#acs-admin.Service_parameters\#" } - display_template {\#acs-admin.Parameters\#} - html {align left} + display_template { #acs-admin.Parameters#} + html {align left style "white-space: nowrap;"} } }