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

Change Source to return an array of sources (Thanks to Vadim Vatlin for the suggestion).

Browse source
This commit is contained in:
Dave Cross 2010-07-11 18:09:54 +01:00
parent 98a34879dc
commit ac8a2f3c00
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lib/Parse/RPM/Spec.pm
View file

@ -7,7 +7,7 @@ use warnings;
use Carp;
use Moose;
our $VERSION = '0.07';
our $VERSION = '0.08';
has file => ( is => 'rw', isa => 'Str', required => 1 );
has name => ( is => 'rw', isa => 'Str' );
@ -18,7 +18,7 @@ has summary => ( is => 'rw', isa => 'Str' );
has license => ( is => 'rw', isa => 'Str' );
has group => ( is => 'rw', isa => 'Str' );
has url => ( is => 'rw', isa => 'Str' );
has source => ( is => 'rw', isa => 'Str' );
has source => ( is => 'rw', isa => 'ArrayRef[Str]' );
has buildroot => ( is => 'rw', isa => 'Str' );
has buildarch => ( is => 'rw', isa => 'Str' );
has buildrequires => ( is => 'rw', isa => 'ArrayRef[Str]' );
@ -66,7 +66,7 @@ sub parse_file {
/^License:\s*(.+)/ and $self->{license} = $1;
/^Group:\s*(\S+)/ and $self->{group} = $1;
/^URL:\s*(\S+)/ and $self->{url} = $1;
/^Source0?:\s*(\S+)/ and $self->{source} = $1;
/^Source\d*:\s*(\S+)/ and push @{$self->{source}}, $1;
/^BuildRoot:\s*(\S+)/ and $self->{buildroot} = $1;
/^BuildArch:\s*(\S+)/ and $self->{buildarch} = $1;