3 use Test::More tests => 4;;
10 is($c->resolve_empty_path, '~/perl5');
11 is($c->resolve_empty_path('foo'), 'foo');
16 local *File::Spec::rel2abs = sub { shift; 'FOO'.shift; };
17 is($c->resolve_relative_path('bar'),'FOObar');
21 File::Path::rmtree('t/var/splat');
22 $c->ensure_dir_structure_for('t/var/splat');