Index: openacs-4/packages/dynamic-types/www/dtypes-code.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dynamic-types/www/dtypes-code.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/dynamic-types/www/dtypes-code.adp	4 Jun 2005 16:09:54 -0000	1.1
+++ openacs-4/packages/dynamic-types/www/dtypes-code.adp	5 Jun 2005 00:02:49 -0000	1.2
@@ -4,6 +4,7 @@
 
 <p>#dynamic-types.code_necessary#</p>
 <pre style="border: 1px solid #CCC; background-color: #EEE; padding: 10px;">
+set default_locale [lang::system::site_wide_locale]
 <multiple name=types>
 <include src="/packages/dynamic-types/lib/dtype-code" object_type="@types.object_type@">
 </multiple>