Index: openacs-4/packages/acs-lang/www/admin/package-list.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/admin/package-list.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-lang/www/admin/package-list.tcl	22 Oct 2003 13:30:31 -0000	1.4
+++ openacs-4/packages/acs-lang/www/admin/package-list.tcl	11 Dec 2003 21:39:53 -0000	1.5
@@ -29,11 +29,11 @@
 set context [list $page_title]
 
 set locale_enabled_p [expr [lsearch [lang::system::get_locales] $current_locale] != -1]
+set site_wide_admin_p [acs_user::site_wide_admin_p]
 
 
 
 
-
 #####
 #
 # Package/message list
@@ -114,6 +114,5 @@
 }
 
 
-set import_all_url [export_vars -base import-locale-from-files { { locale $current_locale } }]
-set export_all_url [export_vars -base export-locale-to-files { { locale $current_locale } }]
-
+set import_all_url [export_vars -base import-messages { { locale $current_locale } {return_url {[ad_return_url]}} }]
+set export_all_url [export_vars -base export-messages { { locale $current_locale } {return_url {[ad_return_url]}} }]