--- loncom/interface/lonuserutils.pm 2008/12/06 20:32:37 1.75
+++ loncom/interface/lonuserutils.pm 2008/12/12 16:50:53 1.77
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Utility functions for managing LON-CAPA user accounts
#
-# $Id: lonuserutils.pm,v 1.75 2008/12/06 20:32:37 schafran Exp $
+# $Id: lonuserutils.pm,v 1.77 2008/12/12 16:50:53 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -2457,7 +2457,7 @@ END
$cellentry = ''.&mt('auto').' ';
$autocount ++;
} else {
- $cellentry = '
';
}
$r->print("$cellentry | \n");
} else {
@@ -3637,14 +3637,13 @@ sub upfile_drop_add {
ne &LONCAPA::clean_username($entries{$fields{'username'}})) {
$r->print('
'.
&mt('[_1]: Unacceptable username for user [_2] [_3] [_4] [_5]',
- ''.$entries{$fields{'username'}}.'',$fname,$mname,$lname,$gen).
- '');
+ ''.$entries{$fields{'username'}}.'',$fname,$mname,$lname,$gen));
next;
} else {
if ($entries{$fields{'domain'}}
ne &LONCAPA::clean_domain($entries{$fields{'domain'}})) {
$r->print('
'. ''.$entries{$fields{'domain'}}.
- ': '.&mt('Unacceptable domain for user [_2] [_3] [_4] [_5]',$fname,$mname,$lname,$gen).'');
+ ': '.&mt('Unacceptable domain for user [_2] [_3] [_4] [_5]',$fname,$mname,$lname,$gen));
next;
}
my $username = $entries{$fields{'username'}};