# t/05_template.t -- tests abilty to create template directory
#use Test::More qw/no_plan/;
use Test::More tests => 24;
use File::pushd;
#--------------------------------------------------------------------------#
# Mask any user defaults for the duration of the program
#--------------------------------------------------------------------------#
BEGIN {
use_ok( "ExtUtils::ModuleMaker::Auxiliary",
qw( _save_pretesting_status _restore_pretesting_status )
);
}
# these add 8 tests
my $pretest_status = _save_pretesting_status();
END { _restore_pretesting_status( $pretest_status ) }
#--------------------------------------------------------------------------#
BEGIN { use_ok( 'ExtUtils::ModuleMaker::TT' ); }
{
my $dir = tempd();
ok (ExtUtils::ModuleMaker::TT->create_template_directory('templates'),
"create_template_directory");
###########################################################################
ok (chdir 'templates',
"cd templates");
# MANIFEST.SKIP .cvsignore
for ( keys %ExtUtils::ModuleMaker::TT::templates ) {
ok (-e,
"$_ exists");
}
}