6 # Remove all relevant env variables to avoid accidental fail
7 foreach my $name ( grep { m{^(CATALYST)} } keys %ENV ) {
18 use base 'Catalyst::Plugin::ConfigLoader';
21 sub path_to { shift; Path::Class::dir('/home/foo/QX-0.9.5/' . shift); }
24 my $app = bless {}, 'QX';
25 my ($path, $extension) = $app->get_config_path;
26 is $path, Path::Class::dir( '/home/foo/QX-0.9.5/qx' )->stringify;