version 1.368, 2007/06/19 20:14:31
|
version 1.371, 2007/06/20 21:06:51
|
Line 2047 sub crsenv {
|
Line 2047 sub crsenv {
|
# |
# |
# Deal with the emails |
# Deal with the emails |
if ($name =~ /\.email$/) { |
if ($name =~ /\.email$/) { |
my ($user,$domain) = split(/:/,$value); |
foreach my $specifier (split(',',$value)) { |
if (!defined($user) || !defined($domain)) { |
my ($user,$sections_or_groups)= |
$setoutput.= '<br /> <span class="LC_error">'. |
($specifier=~/^([^\(]+)\(([^\)]+)\)/); |
&mt("Invalid email address specified, address must be of the form username:domain"). |
if (!$sections_or_groups) { |
'</span>'; |
$user = $specifier; |
undef($value); |
} |
} elsif (&Apache::lonnet::homeserver($user,$domain) eq 'no_host') { |
my ($name,$domain) = split(':',$user); |
$setoutput.= '<br /> <span class="LC_error">'. |
if (!defined($user) || !defined($domain)) { |
&mt("Invalid email address specified, user [_1] is unknown.",$value). |
$setoutput.= '<br /> <span class="LC_error">'. |
'</span>'; |
&mt("Invalid email address specified, address must be of the form username:domain what was specified was ([_1])",$user). |
undef($value); |
'</span>'; |
|
undef($value); |
|
} elsif (&Apache::lonnet::homeserver($user,$domain) eq 'no_host') { |
|
$setoutput.= '<br /> <span class="LC_error">'. |
|
&mt("Invalid email address specified, user [_1] is unknown.",$name). |
|
'</span>'; |
|
undef($value); |
|
} |
} |
} |
} |
} |
# Get existing cloners |
# Get existing cloners |
Line 2226 sub crsenv {
|
Line 2233 sub crsenv {
|
' Tabloid [11x17 in], Executive [7 1/2x10 in], A2 [420x594 mm],'. |
' Tabloid [11x17 in], Executive [7 1/2x10 in], A2 [420x594 mm],'. |
' A3 [297x420 mm], A4 [210x297 mm], A5 [148x210 mm], A6 [105x148 mm])', |
' A3 [297x420 mm], A4 [210x297 mm], A5 [148x210 mm], A6 [105x148 mm])', |
'print_header_format' |
'print_header_format' |
=> '<b>Print header format; substitutions</b>: %n student name %c course id %a assignment note, numbers after the % limit the field size', |
=> &mtn('<b> Print header format; substitutions </b>: %n student name %c course id %a assignment note, numbers after the % limit the field size.').'</b>', |
'anonymous_quiz' |
|
=> '<b>'.&mt('Anonymous quiz/exam').'</b><br />'. |
|
' (<tt><b>'.&mt('yes').'</b> '.&mt('to avoid print students names').' </tt>)', |
|
'default_enrollment_start_date' => '<b>'.&mt('Default beginning date for student access.').'</b>', |
'default_enrollment_start_date' => '<b>'.&mt('Default beginning date for student access.').'</b>', |
'default_enrollment_end_date' => '<b>'.&mt('Default ending date for student access.').'</b>', |
'default_enrollment_end_date' => '<b>'.&mt('Default ending date for student access.').'</b>', |
'nothideprivileged' => '<b>'.&mt('Privileged users that should not be hidden on staff listings').'</b>'. |
'nothideprivileged' => '<b>'.&mt('Privileged users that should not be hidden on staff listings').'</b>'. |
Line 2363 $start_header_row
|
Line 2367 $start_header_row
|
$end_header_row |
$end_header_row |
$output |
$output |
$end_table |
$end_table |
<input type="submit" name="crsenv" value="$lt{'sce'}"> |
<input type="submit" name="crsenv" value="$lt{'sce'}" /> |
</form> |
</form> |
$end_page |
$end_page |
ENDENV |
ENDENV |