package
BaseIncOptional;
is
$INC
[-1],
'.'
,
'trailing dot remains in @INC during optional module load from base'
;
ok
eval
(
'require t::lib::Dummy'
),
'... and modules load fine from .'
or diag
"$@"
;
delete
$INC
{
't/lib/Dummy.pm'
};
}
push
@INC
,
't/lib/on-tail'
;
1;