geoff 2004/03/24 06:52:13 Modified: src/docs/2.0/user/porting porting.pod Log: revert to 1.15 Revision Changes Path 1.17 +2 -2 modperl-docs/src/docs/2.0/user/porting/porting.pod Index: porting.pod =================================================================== RCS file: /home/cvs/modperl-docs/src/docs/2.0/user/porting/porting.pod,v retrieving revision 1.16 retrieving revision 1.17 diff -u -r1.16 -r1.17 --- porting.pod 19 Jan 2004 19:00:51 -0000 1.16 +++ porting.pod 24 Mar 2004 14:52:13 -0000 1.17 @@ -1297,14 +1297,14 @@ </IfDefine> From within Perl code this can be tested with -C<Apache::Server::exists_config_define()>. For example, we can use this method +C<Apache::exists_config_define()>. For example, we can use this method to decide whether or not to call C<$r-E<gt>send_http_header()>, which no longer exists in mod_perl 2.0: sub handler { my $r = shift; $r->content_type('text/html'); - $r->send_http_header() unless Apache::Server::exists_config_define("MODPERL2"); + $r->send_http_header() unless Apache::exists_config_define("MODPERL2"); ... }
--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]