Index: openacs-4/packages/acs-admin/www/users/one.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/one.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-admin/www/users/one.tcl	24 Sep 2002 00:12:32 -0000	1.5
+++ openacs-4/packages/acs-admin/www/users/one.tcl	18 Nov 2002 18:01:17 -0000	1.6
@@ -40,7 +40,7 @@
 
 set context [list [list "./" "Users"] "One User"]
 set export_edit_vars [export_url_vars user_id return_url]
-set registration_date [util_AnsiDatetoPrettyDate $creation_date] 
+set registration_date [lc_time_fmt $creation_date "%q"]
 
 set portrait_p 0
 if {[db_0or1row get_item_id "select live_revision as revision_id, nvl(title,'view this portrait') portrait_title