for the sake of the archives, william reported that the below fixup handler
is "working like a champ" so I guess this is a workable solution for anyone
in the same situation.
and for anyone listening, rolling up a test tarball like william did was
outstanding - I was more than happy (ecstatic, actually) to spend the 10
minutes it took me to code the proper handler when all I needed to do was
run 'make test' and see _exactly_ what he saw as the problem and what he
expected to see when all was working properly.
so, thanks william :)
--Geoff
> the below code used as the only fixup
> handler should do the trick.
>
> HTH
>
> --Geoff
>
> package My::Fixup;
>
> use strict;
> use warnings FATAL => qw(all);
>
> use Apache2::Const -compile => qw(DIR_MAGIC_TYPE OK DECLINED);
> use Apache2::RequestRec;
>
> sub handler {
>
> my $r = shift;
>
> if ($r->handler eq 'perl-script' &&
> -d $r->filename &&
> $r->is_initial_req)
> {
> $r->handler(Apache2::Const::DIR_MAGIC_TYPE);
>
> return Apache2::Const::OK;
> }
>
> return Apache2::Const::DECLINED;
> }
>
> 1;
