zyppe/parse-rpm-spec
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Initial revision

Browse source
This commit is contained in:
Dave Cross 2008-08-25 11:37:19 +00:00
commit 598503e669
7 changed files with 294 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

19
t/Parse-RPM-Spec.t Normal file
View file

@ -0,0 +1,19 @@
use Test::More tests => 12;
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'));
isa_ok($spec, 'Parse::RPM::Spec');
ok($spec = Parse::RPM::Spec->new({ file => 't/file.spec' }));
isa_ok($spec, 'Parse::RPM::Spec');
is($spec->name, 'perl-Array-Compare');
is($spec->version, '1.16');
$spec->version('1.17');
is($spec->version, '1.17');
is(@{$spec->buildrequires}, 2);
is($spec->buildrequires->[0], 'perl >= 1:5.6.0');