version 1.10, 2006/03/21 18:33:39
|
version 1.11, 2006/04/13 19:07:11
|
Line 30 package Apache::lonerrorhandler;
|
Line 30 package Apache::lonerrorhandler;
|
|
|
use strict; |
use strict; |
use Apache::Constants qw(:common); |
use Apache::Constants qw(:common); |
use Apache::loncommon; |
use Apache::loncommon(); |
use Apache::lonnet; |
use Apache::lonnet; |
use Apache::lonmsg; |
use Apache::lonmsg(); |
|
use Apache::lonacc(); |
|
|
sub handler { |
sub handler { |
my $r = shift; |
my $r = shift; |
Line 40 sub handler {
|
Line 41 sub handler {
|
$r->send_http_header; |
$r->send_http_header; |
return OK if $r->header_only; |
return OK if $r->header_only; |
|
|
&Apache::loncommon::get_posted_cgi($r); |
&Apache::lonacc::get_posted_cgi($r); |
|
|
my $title = $env{'form.sendinfo'} ? 'Sending Error Report' |
my $title = $env{'form.sendinfo'} ? 'Sending Error Report' |
: 'Could Not Process Request'; |
: 'Could Not Process Request'; |