[EMAIL PROTECTED] wrote:
> dougm 01/10/08 16:51:21
>
> Modified: lib/Apache compat.pm
> Log:
> add Apache::exit compat wrapper
Uh, Doug, why this and a few other recent commits go into
Apache/compat.pm? Does that mean that Apache::exit is deprecated in 2.0?
The same for running BEGING/END blocks in Registry, should this
functionality go away in 2.x? Once registry 2.x is cleaned up, we don't
want to use Apache::compat. Can you please share some road map on these
issues? Thanks!
> Revision Changes Path
> 1.21 +17 -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.20
> retrieving revision 1.21
> diff -u -r1.20 -r1.21
> --- compat.pm 2001/10/08 20:07:33 1.20
> +++ compat.pm 2001/10/08 23:51:21 1.21
> @@ -35,7 +35,23 @@
>
> package Apache;
>
> -#XXX: exit,warn
> +sub exit {
> + require ModPerl::Util;
> +
> + my $status = 0;
> + my $nargs = @_;
> +
> + if ($nargs == 2) {
> + $status = $_[1];
> + }
> + elsif ($nargs == 1 and $_[0] =~ /^\d+$/) {
> + $status = $_[0];
> + }
> +
> + ModPerl::Util::exit($status);
> +}
> +
> +#XXX: warn
> sub import {
> }
>
>
>
>
>
--
_____________________________________________________________________
Stas Bekman JAm_pH -- Just Another mod_perl Hacker
http://stason.org/ mod_perl Guide http://perl.apache.org/guide
mailto:[EMAIL PROTECTED] http://ticketmaster.com http://apacheweek.com
http://singlesheaven.com http://perl.apache.org http://perlmonth.com/
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
