1 ### make sure we can find our conf.pl file
4 require "$FindBin::Bin/inc/conf.pl";
9 use CPANPLUS::Configure;
10 use CPANPLUS::Backend;
11 use CPANPLUS::Internals::Constants;
12 use Test::More 'no_plan';
15 my $conf = gimme_conf();
17 my $cb = CPANPLUS::Backend->new( $conf );
19 ### XXX SOURCEFILES FIX
20 my $mod = $cb->module_tree( TEST_CONF_MODULE );
22 isa_ok( $mod, 'CPANPLUS::Module' );
24 my $where = $mod->fetch;
25 ok( $where, "Module fetched" );
27 my $dir = $cb->_extract( module => $mod );
28 ok( $dir, "Module extracted" );
29 ok( DIR_EXISTS->($dir), " Dir exists" );
32 # c-indentation-style: bsd
34 # indent-tabs-mode: nil
36 # vim: expandtab shiftwidth=4: