version 1.18, 2008/11/17 14:11:24
|
version 1.23, 2009/02/12 21:15:47
|
Line 26
|
Line 26
|
# http://www.lon-capa.org/ |
# http://www.lon-capa.org/ |
# |
# |
|
|
|
|
|
|
package Apache::lonerrorhandler; |
package Apache::lonerrorhandler; |
|
|
use strict; |
use strict; |
Line 103 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 124 ENDMESSAGE
|
Line 138 ENDMESSAGE
|
.'<p>'.&mt('Please help us to find out what.').'</p>' |
.'<p>'.&mt('Please help us to find out what.').'</p>' |
.'<p>'.&mt('Please take a moment to fill out the form below.').' ' |
.'<p>'.&mt('Please take a moment to fill out the form below.').' ' |
.&mt('Your information, together with internal debugging information, ' |
.&mt('Your information, together with internal debugging information, ' |
.'will be emailed to the system and server administrators.') |
.'will be e-mailed to the system and server administrators.') |
.'</p> |
.'</p> |
<form action="/adm/errorhandler" method="post"> |
<form action="/adm/errorhandler" method="post"> |
<h3>'.&mt('Please describe what you did just before this screen came up').'</h3> |
<h3>'.&mt('Please describe what you did just before this screen came up').'</h3> |
Line 142 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 163 $syllabus.'
|
Line 177 $syllabus.'
|
|
|
1; |
1; |
__END__ |
__END__ |
|
|
|
|
|
=pod |
|
|
|
=head1 NAME |
|
|
|
Apache::lonerrorhandler.pm |
|
|
|
=head1 SYNOPSIS |
|
|
|
Handles errors. |
|
|
|
This is part of the LearningOnline Network with CAPA project |
|
described at http://www.lon-capa.org. |
|
|
|
=head1 OVERVIEW |
|
|
|
None |
|
|
|
=cut |