minor refactoring

This commit is contained in:
Patrick Donelan 2010-04-07 10:50:45 -04:00
parent c7235378d1
commit 1ad2f0cfd7
9 changed files with 4 additions and 44 deletions

View file

@ -224,7 +224,7 @@ sub handle {
# "chunked" or "empty" means it took care of its own output needs
if (defined $output && ( $output eq "chunked" || $output eq "empty" )) {
# warn "chunked and empty no longer stream, use session->response->stream() instead";
warn "chunked and empty no longer stream, use session->response->stream() instead";
if ($session->errorHandler->canShowDebug()) {
$session->output->print($session->errorHandler->showDebug(),1);
}

View file

@ -1,40 +0,0 @@
package WebGUI::Session::Request;
use strict;
use warnings;
=head1 DESCRIPTION
This class wraps calls to $session->request and logs them as a cute way of seeing
what Apache2::* methods webgui is calling
=cut
sub new {
my $class = shift;
bless { @_ }, $class;
}
our $AUTOLOAD;
sub AUTOLOAD {
my $self = shift;
my $what = $AUTOLOAD;
$what =~ s/.*:://;
my $r = $self->{r};
my $session = $self->{session};
if ( !$r ) {
$session->log->error("!!request->$what(@_) but r not defined");
return;
}
if ( $what eq 'print' ) {
$session->log->error("!!request->$what(print--chomped)");
}
else {
$session->log->error("!!request->$what(@_)");
}
return $r->$what(@_);
}
1;