looks good, thanks David!
On Tue, 11 Jan 2000, David D. Kilzer wrote:
> Hi,
>
> The patch below fixes a problem in Apache::RedirectFixLog when the URI
> being logged required use of a filename listed the DirectoryIndex
> directive.
>
> The solution is described in the following post by Doug MacEachern to
> the modperl list in 1998.
>
> http://www.geocrawler.com/mail/msg.php3?msg_id=1059028&list=182
>
> A similar problem is described in the following thread in 1999 (though
> the answer is never realized):
>
> http://www.geocrawler.com/mail/msg.php3?msg_id=2466537&list=182
>
> I am not subscribed to modperl. Please Cc: me on any responses.
>
> Thanks!
>
> Dave
> --
> David D. Kilzer \ ``Follow your dreams, you can reach your goals.
> Senior Programmer / I'm living proof. Beefcake. BEEFCAKE!''
> E-Markets, Inc. \ Eric Cartman
> [EMAIL PROTECTED] / _South_Park_
>
>
> diff -u mod_perl-1.21/lib/Apache/RedirectLogFix.pm.orig
>mod_perl-1.21/lib/Apache/RedirectLogFix.pm
> --- mod_perl-1.21/lib/Apache/RedirectLogFix.pm.orig Wed Aug 12 20:46:26 1998
> +++ mod_perl-1.21/lib/Apache/RedirectLogFix.pm Tue Jan 11 21:21:08 2000
> @@ -3,7 +3,7 @@
> use Apache::Constants qw(OK DECLINED REDIRECT);
>
> sub handler {
> - my $r = shift;
> + my $r = shift->last;
> return DECLINED unless $r->handler && ($r->handler eq "perl-script");
>
> if(my $loc = $r->header_out("Location")) {
>