You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by st...@apache.org on 2003/03/08 09:56:19 UTC
cvs commit: modperl-2.0/t/response/TestModperl current_callback.pm
stas 2003/03/08 00:56:19
Modified: t/response/TestModperl current_callback.pm
Log:
comment out debug prints
Revision Changes Path
1.2 +2 -7 modperl-2.0/t/response/TestModperl/current_callback.pm
Index: current_callback.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/t/response/TestModperl/current_callback.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- current_callback.pm 17 Feb 2003 09:03:17 -0000 1.1
+++ current_callback.pm 8 Mar 2003 08:56:19 -0000 1.2
@@ -21,12 +21,7 @@
$callback,
'inside PerlResponseHandler');
- warn "in callback: $callback\n";
-
-# my $callback = Apache::current_callback();
-# my $expected = 'PerlFixupHandler';
-# die "expecting $expected callback, instead got $callback"
-# unless $callback eq $expected;
+ #warn "in callback: $callback\n";
Apache::OK;
}
@@ -40,7 +35,7 @@
my $callback = Apache::current_callback();
die "expecting $expected callback, instead got $callback"
unless $callback eq $expected;
- warn "in callback: $callback\n";
+ #warn "in callback: $callback\n";
}
1;