You are viewing a plain text version of this content. The canonical link for it is here.
Posted to docs-cvs@perl.apache.org by st...@apache.org on 2003/01/10 05:26:57 UTC
cvs commit: modperl-docs/src/docs/2.0/user/handlers http.pod
stas 2003/01/09 20:26:57
Modified: src/docs/2.0/user/config config.pod
src/docs/2.0/user/handlers http.pod
Log:
use PerlResponseHandler rather than backcompat PerlHandler
Revision Changes Path
1.32 +1 -1 modperl-docs/src/docs/2.0/user/config/config.pod
Index: config.pod
===================================================================
RCS file: /home/cvs/modperl-docs/src/docs/2.0/user/config/config.pod,v
retrieving revision 1.31
retrieving revision 1.32
diff -u -r1.31 -r1.32
--- config.pod 15 Dec 2002 17:32:04 -0000 1.31
+++ config.pod 10 Jan 2003 04:26:57 -0000 1.32
@@ -533,7 +533,7 @@
<Location /perl>
PerlSetEnv TEST hi
SetHandler perl-script
- PerlHandler ModPerl::Registry
+ PerlResponseHandler ModPerl::Registry
Options +ExecCGI
</Location>
1.10 +4 -4 modperl-docs/src/docs/2.0/user/handlers/http.pod
Index: http.pod
===================================================================
RCS file: /home/cvs/modperl-docs/src/docs/2.0/user/handlers/http.pod,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -r1.9 -r1.10
--- http.pod 5 Dec 2002 07:40:51 -0000 1.9
+++ http.pod 10 Jan 2003 04:26:57 -0000 1.10
@@ -310,7 +310,7 @@
Apache::method_register($r->pool, METHOD);
$r->handler("perl-script");
- $r->push_handlers(PerlHandler => \&send_email_handler);
+ $r->push_handlers(PerlResponseHandler => \&send_email_handler);
return Apache::OK;
}
@@ -485,7 +485,7 @@
PerlSetVar ReloadAll Off
PerlSetVar ReloadModules "MyApache::*"
SetHandler perl-script
- PerlHandler ModPerl::Registry
+ PerlResponseHandler ModPerl::Registry
Options +ExecCGI
</Location>
@@ -904,7 +904,7 @@
$r->handler($exts{$ext}->[HANDLER]);
if (defined $exts{$ext}->[CALLBACK]) {
- $r->set_handlers(PerlHandler => $exts{$ext}->[CALLBACK]);
+ $r->set_handlers(PerlResponseHandler => $exts{$ext}->[CALLBACK]);
}
return Apache::OK;
@@ -951,7 +951,7 @@
and the callback if needed:
if (defined $exts{$ext}->[CALLBACK]) {
- $r->set_handlers(PerlHandler => $exts{$ext}->[CALLBACK]);
+ $r->set_handlers(PerlResponseHandler => $exts{$ext}->[CALLBACK]);
}
In this simple example the callback functions don't do much but
---------------------------------------------------------------------
To unsubscribe, e-mail: docs-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: docs-cvs-help@perl.apache.org