--- loncom/interface/Attic/londropadd.pm 2004/06/29 04:30:00 1.115
+++ loncom/interface/Attic/londropadd.pm 2004/09/13 16:21:30 1.118
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to drop and add students in courses
#
-# $Id: londropadd.pm,v 1.115 2004/06/29 04:30:00 raeburn Exp $
+# $Id: londropadd.pm,v 1.118 2004/09/13 16:21:30 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -924,6 +924,8 @@ sub print_enroll_single_student_form {
#
my $username = $ENV{'form.cuname'};
my $domain = $ENV{'form.cudomain'};
+ $username=~s/[\W|_]//gs;
+ $domain=~s/[\W|_]//gs;
my $home = &Apache::lonnet::homeserver($username,$domain);
# $new_user flags whether we are creating a new user or using an old one
my $new_user = 1;
@@ -1375,7 +1377,7 @@ END
$cellentry = ''.&mt('auto').' Change';
$autocount ++;
} else {
- $cellentry = '