Index: openacs-4/packages/acs-lang/tcl/locale-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/locale-procs.tcl,v
diff -u -r1.33 -r1.34
--- openacs-4/packages/acs-lang/tcl/locale-procs.tcl	4 Oct 2005 02:37:26 -0000	1.33
+++ openacs-4/packages/acs-lang/tcl/locale-procs.tcl	4 Jun 2006 00:45:39 -0000	1.34
@@ -361,7 +361,7 @@
     @param package_id The package for which you want to set the locale setting, if you want to set it for a specific package, as opposed to a site-wide setting.
     @param locale The new locale that you want to use as your system locale.
 } {
-    if { [empty_string_p $user_id] } {
+    if { $user_id eq "" } {
 	set user_id [ad_conn user_id]
     }