Index: openacs-4/packages/acs-subsite/lib/user-info.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/user-info.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/acs-subsite/lib/user-info.tcl	24 Sep 2003 15:19:24 -0000	1.8
+++ openacs-4/packages/acs-subsite/lib/user-info.tcl	7 Oct 2003 10:16:16 -0000	1.9
@@ -93,12 +93,13 @@
 }
 
 if { ![string equal [acs_user::ScreenName] "none"] } {
-    ad_form -extend -name user_info -form [list \
-                                               [list screen_name:text[ad_decode [acs_user::ScreenName] "solicit" ",optional" ""] \
-                                                    {label "Screen name"} \
-                                                    {html {size 50}} \
-                                                    {mode $elm_mode(screen_name)} \
-                                                   ]]
+    ad_form -extend -name user_info -form \
+        [list \
+             [list screen_name:text[ad_decode [acs_user::ScreenName] "solicit" ",optional" ""] \
+                  {label "Screen name"} \
+                  {html {size 50}} \
+                  {mode $elm_mode(screen_name)} \
+                 ]]
 }