Index: openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl,v
diff -u -r1.29 -r1.30
--- openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl	3 Nov 2003 10:50:18 -0000	1.29
+++ openacs-4/packages/acs-lang/tcl/lang-util-procs.tcl	11 Feb 2004 14:48:34 -0000	1.30
@@ -628,8 +628,7 @@
 
     @see lang::util::translator_mode_set
 } {
-    global ad_conn
-    if { [info exists ad_conn] } {
+    if { [ad_conn isconnected] } {
         # THere is an HTTP connection - return the client property
         return [ad_get_client_property -default 0 acs-lang translator_mode_p]
     } else {