On Wednesday 08 October 2008 10:14:30 [EMAIL PROTECTED] wrote: > Modified: > trunk/t/pmc/config.t > > Log: > [t] fix config pmc test to deal with case-insensitive platform > > Modified: trunk/t/pmc/config.t > =========================================================================== >=== --- trunk/t/pmc/config.t (original) > +++ trunk/t/pmc/config.t Wed Oct 8 10:14:30 2008 > @@ -38,13 +38,19 @@ > Hash > OUT > > -pir_output_is( <<'CODE', cwd, "prefix" ); > +pir_output_is( <<'CODE', ($^O eq 'MSWin32' ? lc(cwd) : cwd), "prefix" ); > .sub main :main > + load_bytecode "config.pbc" > .include "iglobals.pasm" > - .local pmc config_hash, interp > + .local pmc config_hash, interp, cfg > interp = getinterp > config_hash = interp[.IGLOBALS_CONFIG_HASH] > $S0 = config_hash["prefix"] > + cfg = _config() > + $S1 = cfg['osname'] > + if $S1 != 'MSWin32' goto sayit > + downcase $S0 > + sayit: > print $S0 > .end > CODE
In general, filesystems are case-insensitive, not platforms. I believe Mac OS X's Hateful File System Plus is one offender, though you can use UFS instead. -- c
