stas 2004/08/25 17:00:33
Modified: lib/Apache compat.pm
t/response/TestCompat apache.pm
Log:
Apache::current_callback => ModPerl::Util::current_callback transition
fixes
Revision Changes Path
1.117 +1 -1 modperl-2.0/lib/Apache/compat.pm
Index: compat.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/lib/Apache/compat.pm,v
retrieving revision 1.116
retrieving revision 1.117
diff -u -u -r1.116 -r1.117
--- compat.pm 21 Aug 2004 00:27:21 -0000 1.116
+++ compat.pm 26 Aug 2004 00:00:33 -0000 1.117
@@ -367,7 +367,7 @@
sub cleanup_for_exec {}
sub current_callback {
- return Apache::current_callback();
+ return ModPerl::Util::current_callback();
}
sub send_http_header {
1.19 +1 -1 modperl-2.0/t/response/TestCompat/apache.pm
Index: apache.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/t/response/TestCompat/apache.pm,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -u -r1.18 -r1.19
--- apache.pm 25 Aug 2004 21:51:18 -0000 1.18
+++ apache.pm 26 Aug 2004 00:00:33 -0000 1.19
@@ -36,7 +36,7 @@
Apache::ServerUtil::exists_config_define('MODPERL2'),
'Apache->define');
- ok t_cmp(ModPerl::Util::current_callback(),
+ ok t_cmp($r->current_callback,
'PerlResponseHandler',
'inside PerlResponseHandler');