diff --git a/t/Parse-RPM-Spec.t b/t/Parse-RPM-Spec.t index ada2049..b549927 100644 --- a/t/Parse-RPM-Spec.t +++ b/t/Parse-RPM-Spec.t @@ -1,14 +1,10 @@ -use Test::More tests => 12; +use Test::More tests => 10; BEGIN { use_ok('Parse::RPM::Spec') }; -eval { my $spec = Parse::RPM::Spec->new(\'t/file.spec') }; -ok($@); -like($@, qr/SCALAR/); - -ok($spec = Parse::RPM::Spec->new('t/file.spec')); +ok($spec = Parse::RPM::Spec->new( { file => 't/file.spec' } )); isa_ok($spec, 'Parse::RPM::Spec'); -ok($spec = Parse::RPM::Spec->new({ file => 't/file.spec' })); +ok($spec = Parse::RPM::Spec->new( { file => 't/file.spec' } )); isa_ok($spec, 'Parse::RPM::Spec'); is($spec->name, 'perl-Array-Compare');