stas 2004/07/04 21:00:12
Modified: . Changes xs/maps apache_functions.map t/response/TestAPI rutil.pm server_util.pm Log: method_register moving from Apache:: to Apache::RequestUtil:: Revision Changes Path 1.401 +2 -2 modperl-2.0/Changes Index: Changes =================================================================== RCS file: /home/cvs/modperl-2.0/Changes,v retrieving revision 1.400 retrieving revision 1.401 diff -u -u -r1.400 -r1.401 --- Changes 4 Jul 2004 08:34:17 -0000 1.400 +++ Changes 5 Jul 2004 04:00:12 -0000 1.401 @@ -12,8 +12,8 @@ =item 1.99_15-dev -Moving methods [Stas] - Apache::get_status_line => Apache::RequestUtil::get_status_line +Moving HTTP specific functions get_status_line, method_register from +Apache:: to Apache::RequestUtil:: to match their container [Stas] Adjust the list of mod_perl header files installed into the Apache2 include/ directory, made necessary from the renaming and refactoring 1.85 +1 -1 modperl-2.0/xs/maps/apache_functions.map Index: apache_functions.map =================================================================== RCS file: /home/cvs/modperl-2.0/xs/maps/apache_functions.map,v retrieving revision 1.84 retrieving revision 1.85 diff -u -u -r1.84 -r1.85 --- apache_functions.map 4 Jul 2004 08:34:18 -0000 1.84 +++ apache_functions.map 5 Jul 2004 04:00:12 -0000 1.85 @@ -37,6 +37,7 @@ MODULE=Apache::RequestUtil ap_get_status_line + ap_method_register MODULE=Apache::RequestUtil PACKAGE=guess >ap_finalize_request_protocol @@ -45,7 +46,6 @@ ap_get_server_port !ap_content_type_tolower ap_is_initial_req - ap_method_register >ap_method_registry_init >ap_process_request_internal ?ap_get_mime_headers 1.15 +4 -1 modperl-2.0/t/response/TestAPI/rutil.pm Index: rutil.pm =================================================================== RCS file: /home/cvs/modperl-2.0/t/response/TestAPI/rutil.pm,v retrieving revision 1.14 retrieving revision 1.15 diff -u -u -r1.14 -r1.15 --- rutil.pm 4 Jul 2004 08:34:18 -0000 1.14 +++ rutil.pm 5 Jul 2004 04:00:12 -0000 1.15 @@ -19,7 +19,7 @@ sub handler { my $r = shift; - plan $r, tests => (scalar keys %status_lines) + 7; + plan $r, tests => (scalar keys %status_lines) + 8; ok $r->default_type; @@ -45,6 +45,9 @@ Apache::RequestUtil::get_status_line($code), "Apache::RequestUtil::get_status_line($code)"); } + + t_debug('registering method FOO'); + ok Apache::RequestUtil::method_register($r->server->process->pconf, 'FOO'); Apache::OK; } 1.19 +1 -4 modperl-2.0/t/response/TestAPI/server_util.pm Index: server_util.pm =================================================================== RCS file: /home/cvs/modperl-2.0/t/response/TestAPI/server_util.pm,v retrieving revision 1.18 retrieving revision 1.19 diff -u -u -r1.18 -r1.19 --- server_util.pm 4 Jul 2004 08:34:18 -0000 1.18 +++ server_util.pm 5 Jul 2004 04:00:12 -0000 1.19 @@ -45,7 +45,7 @@ '__PACKAGE__->new($r)' => __PACKAGE__->new($r), ); - plan $r, tests => 12 + + plan $r, tests => 11 + (scalar keys %pools) + (scalar keys %objects); @@ -120,9 +120,6 @@ $dir, "\$r->server_root_relative($dir)"); } - - t_debug('registering method FOO'); - ok Apache::method_register($r->server->process->pconf, 'FOO'); t_debug('Apache::exists_config_define'); ok Apache::exists_config_define('MODPERL2');