Re: [MacPerl-Porters] [PROPOSED PATCHES] lib.pm/lib.t

> -    # lib.pm is documented to only work with Unix filepaths.
>       @lib_dir  = qw(stuff moo);
> -    $Lib_Dir  = join "/", @lib_dir;
> -    $Arch_Dir = join "/", @lib_dir, $Config{archname};
> +    $Lib_Dir = File::Spec->catdir( @lib_dir );
> +    $Arch_Dir = File::Spec->catdir( @lib_dir, $Config{archname} );
> 
>       # create the auto/ directory and a module
>       $Auto_Dir = File::Spec->catdir(@lib_dir, $Config{archname},'auto');
> @@ -56,8 +55,7 @@
>       is( $INC[0], $Arch_Dir,        '    auto/ dir in front of that' );
>       is( grep(/^\Q$Lib_Dir\E$/, @INC), 1,   '    no duplicates' );
> 
> -    # Yes, %INC uses Unixy filepaths.
> -    is( $INC{'Yup.pm'}, join("/",$Lib_Dir, 'Yup.pm'),    '%INC set 
> properly' );
> +    is( $INC{'Yup.pm'}, File::Spec->catfile( $Lib_Dir, 'Yup.pm'), 
> '%INC set properly' );

I don't we can break this documented feature (like, ever).  Instead,
could the (internal) %INC and @INC handling in MacOS Classic be hacked
to always talk UNIX?

-- 
$jhi++; # http://www.iki.fi/jhi/
        # There is this special biologist word we use for 'stable'.
        # It is 'dead'. -- Jack Cohen