# t/01_ini.t - check module loading
use strict;
local $^W = 1;
use Test::More
tests => 5;
# qw(no_plan);
use_ok( 'ExtUtils::ModuleMaker' );
use_ok( 'File::Save::Home', qw|
get_home_directory
get_subhome_directory_status
make_subhome_directory
restore_subhome_directory_status
| );
my ($realhome);
ok( $realhome = get_home_directory(),
"HOME or home-equivalent directory found on system");
my $mmkr_dir_ref = get_subhome_directory_status(".modulemaker");
my $mmkr_dir = make_subhome_directory($mmkr_dir_ref);
ok( $mmkr_dir, "personal defaults directory found on system");
END {
ok( restore_subhome_directory_status($mmkr_dir_ref),
"original presence/absence of .modulemaker directory restored");
}