Changes to support the Moose version.

This commit is contained in:
Dave Cross 2009-07-25 20:20:19 +01:00
parent f9cee540f3
commit e405f0ee4e

View file

@ -1,11 +1,7 @@
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' } ));