Index: openacs-4/packages/acs-subsite/lib/login.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/login.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/acs-subsite/lib/login.tcl	2 Oct 2003 12:42:51 -0000	1.13
+++ openacs-4/packages/acs-subsite/lib/login.tcl	5 Oct 2003 17:41:38 -0000	1.14
@@ -85,7 +85,7 @@
 
 set focus {}
 if { [auth::UseEmailForLoginP] } {
-    ad_form -extend -name login -form [list [list email:text($username_widget) [list label "Email"]]]
+    ad_form -extend -name login -form [list [list email:text($username_widget),nospell [list label "Email"]]]
     set user_id_widget_name email
     if { ![empty_string_p $email] } {
         set focus "password"
@@ -102,7 +102,7 @@
         }
     }
 
-    ad_form -extend -name login -form [list [list username:text($username_widget) [list label "Username"]]]
+    ad_form -extend -name login -form [list [list username:text($username_widget),nospell [list label "Username"]]]
     set user_id_widget_name username
     if { ![empty_string_p $username] } {
         set focus "password"