stas 2004/07/15 14:29:51
Modified: . Changes t/conf extra.conf.in t/response/TestAPI rutil.pm xs/maps apache_functions.map Log: $r->psignature now lives in the package it belongs to: Apache::RequestUtil (previously lived in Apache::ServerUtil). Revision Changes Path 1.417 +3 -0 modperl-2.0/Changes Index: Changes =================================================================== RCS file: /home/cvs/modperl-2.0/Changes,v retrieving revision 1.416 retrieving revision 1.417 diff -u -u -r1.416 -r1.417 --- Changes 15 Jul 2004 20:52:38 -0000 1.416 +++ Changes 15 Jul 2004 21:29:51 -0000 1.417 @@ -12,6 +12,9 @@ =item 1.99_15-dev +$r->psignature now lives in the package it belongs to: +Apache::RequestUtil (previously lived in Apache::ServerUtil). [Stas] + A few functions moved namespace from Apache:: to Apache::ServerUtil:: (to make it easier to find the container of the function): [Stas] - exists_config_define 1.13 +3 -0 modperl-2.0/t/conf/extra.conf.in Index: extra.conf.in =================================================================== RCS file: /home/cvs/modperl-2.0/t/conf/extra.conf.in,v retrieving revision 1.12 retrieving revision 1.13 diff -u -u -r1.12 -r1.13 --- extra.conf.in 19 May 2004 18:51:23 -0000 1.12 +++ extra.conf.in 15 Jul 2004 21:29:51 -0000 1.13 @@ -1,3 +1,6 @@ +# needed to test $r->psignature +ServerSignature On + # The following tests require more than one interpreter during the # same request: # 1.18 +5 -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.17 retrieving revision 1.18 diff -u -u -r1.17 -r1.18 --- rutil.pm 14 Jul 2004 07:27:00 -0000 1.17 +++ rutil.pm 15 Jul 2004 21:29:51 -0000 1.18 @@ -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; @@ -32,6 +32,10 @@ ok $r->get_limit_req_body || 1; ok $r->is_initial_req; + + my $sig = $r->psignature("Here is the sig: "); + t_debug $sig; + ok $sig; my $pattern = qr!(?s)GET /TestAPI__rutil.*Host:.*200 OK.*Content-Type:!; 1.89 +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.88 retrieving revision 1.89 diff -u -u -r1.88 -r1.89 --- apache_functions.map 15 Jul 2004 20:36:29 -0000 1.88 +++ apache_functions.map 15 Jul 2004 21:29:51 -0000 1.89 @@ -39,6 +39,7 @@ ap_get_status_line MODULE=Apache::RequestUtil PACKAGE=guess + ap_psignature | | r, prefix >ap_finalize_request_protocol ap_default_type ap_get_server_name @@ -175,7 +176,6 @@ ~ap_get_server_built ~ap_get_server_version ~ap_server_root - ap_psignature | | r,prefix ~ap_server_root_relative MODULE=Apache::Connection PACKAGE=guess