admin: distfiles/specparser.pl - argh, NoSource should have priority over md5

[qboosh]

Author: qboosh                       Date: Tue Aug 26 16:30:50 2008 GMT
Module: admin                         Tag: HEAD
---- Log message:
- argh, NoSource should have priority over md5

---- Files affected:
admin/distfiles:
   specparser.pl (1.18 -> 1.19) 

---- Diffs:

================================================================
Index: admin/distfiles/specparser.pl
diff -u admin/distfiles/specparser.pl:1.18 admin/distfiles/specparser.pl:1.19
--- admin/distfiles/specparser.pl:1.18	Tue Aug 12 22:52:28 2008
+++ admin/distfiles/specparser.pl	Tue Aug 26 18:30:45 2008
@@ -254,7 +254,7 @@
 			my $md5 = $2;
 			if (defined $no_source{$no}) {
 				error("both NoSource: $no and md5 given");
-			} if (defined $sourcemap[$no]) {
+			} elsif (defined $sourcemap[$no]) {
 				my $source = $sourcemap[$no];
 				push @sources, [$no, $md5, $source];
 			} else {
@@ -265,7 +265,7 @@
 			my $md5 = $2;
 			if (defined $no_source{$no}) {
 				error("both NoSource: $no and md5 given");
-			} if (defined $sourcemap[$no]) {
+			} elsif (defined $sourcemap[$no]) {
 				my $source = $sourcemap[$no];
 				push @sources, [$no, $md5, $source];
 			} else {
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/cgi-bin/cvsweb.cgi/admin/distfiles/specparser.pl?r1=1.18&r2=1.19&f=u