version 1.20, 2008/11/21 20:17:11
|
version 1.22, 2009/01/04 19:49:19
|
Line 105 ENDMESSAGE
|
Line 105 ENDMESSAGE
|
my $env=''; |
my $env=''; |
my $syllabus=''; |
my $syllabus=''; |
|
|
|
foreach $envkey (keys(%env)) { |
|
if ($envkey =~ /^form\.(.+)\.filename$/) { |
|
my $item = $1; |
|
if (exists($env{'form.'.$item.'.mimetype'})) { |
|
if (exists($env{'form.'.$item})) { |
|
my $size = (length($env{'form.'.$item}))/(1024.0 * 1024.0); |
|
$env{'form.'.$item} = &mt('File (contents not shown) - size was [_1] MB.',sprintf("%.4f",$size)); |
|
} |
|
} |
|
} |
|
} |
|
|
foreach $envkey (sort(keys(%env))) { |
foreach $envkey (sort(keys(%env))) { |
$env.="$envkey: $env{$envkey}\n"; |
$env.="$envkey: $env{$envkey}\n"; |
} |
} |
Line 144 ENDMESSAGE
|
Line 156 ENDMESSAGE
|
<input type="hidden" name="syllabus" value="'.$syllabus.'" /> |
<input type="hidden" name="syllabus" value="'.$syllabus.'" /> |
<input type="hidden" name="sendinfo" value="1" /> |
<input type="hidden" name="sendinfo" value="1" /> |
<p> |
<p> |
<input type="submit" title="Send Information" value="'.&mt('Send').'" /> |
<input type="submit" title="'.&mt('Send Information').'" value="'.&mt('Send').'" /> |
</p> |
</p> |
</form> |
</form> |
<h1>'.&mt('Thank you for your help!').'</h1> |
<h1>'.&mt('Thank you for your help!').'</h1> |
Line 184 described at http://www.lon-capa.org.
|
Line 196 described at http://www.lon-capa.org.
|
|
|
None |
None |
|
|
=cut |
|
|
|
|
=cut |