From ac8a2f3c004dbcc9819308f80c08f9507b489a8a Mon Sep 17 00:00:00 2001 From: Dave Cross Date: Sun, 11 Jul 2010 18:09:54 +0100 Subject: [PATCH] Change Source to return an array of sources (Thanks to Vadim Vatlin for the suggestion). --- lib/Parse/RPM/Spec.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lib/Parse/RPM/Spec.pm b/lib/Parse/RPM/Spec.pm index c080ca9..30abc17 100644 --- a/lib/Parse/RPM/Spec.pm +++ b/lib/Parse/RPM/Spec.pm @@ -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;