Index: openacs-4/packages/acs-lang/www/admin/locale-set-enabled-p.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/admin/locale-set-enabled-p.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-lang/www/admin/locale-set-enabled-p.tcl	8 Aug 2003 12:21:28 -0000	1.1
+++ openacs-4/packages/acs-lang/www/admin/locale-set-enabled-p.tcl	14 Aug 2003 16:06:20 -0000	1.2
@@ -12,5 +12,9 @@
 
 db_dml set_enabled_p { update ad_locales set enabled_p = :enabled_p where locale = :locale }
 
-ad_returnredirect .
+# Flush caches
+util_memoize_flush_regexp {^lang::system::default_locale_not_cached}
+util_memoize_flush_regexp {^lang::system::get_locales}
+
+ad_returnredirect . 
 ad_script_abort