#!/usr/bin/perl
use
strict;
BEGIN {
$| = 1;
$^W = 1;
}
#####################################################################
# Main Tests
my
$module1
= Perl::Dist::Asset::Module->new(
name
=>
'Params::Util'
,
);
isa_ok(
$module1
,
'Perl::Dist::Asset::Module'
);
is(
$module1
->name,
'Params::Util'
,
'->name ok'
);
is(
$module1
->force, 0,
'->force ok'
);