also consider patches as sources
authorLudwig Nussel <ludwig.nussel@suse.de>
Wed, 17 Jun 2009 12:20:08 +0000 (12:20 +0000)
committerLudwig Nussel <ludwig.nussel@suse.de>
Wed, 17 Jun 2009 12:20:08 +0000 (12:20 +0000)
spectool

index a755b8e..0d9136c 100755 (executable)
--- a/spectool
+++ b/spectool
@@ -272,7 +272,7 @@ for my $spec (@specs) {
     my $srcfile = read_sources_digests($files, $spec);
     if ($opt_download) {
       for my $t (keys %$parsed) {
-       next unless ($t =~ /^source\d*/);
+       next unless ($t =~ /^(?:source|patch)\d*/);
        my $url = $parsed->{$t};
        next unless $url =~ /^(?:http|ftp):\/\//;
        my $file = $url;
@@ -297,7 +297,7 @@ for my $spec (@specs) {
     if ($opt_update) {
       my $changed;
       for my $t (keys %$parsed) {
-       next unless ($t =~ /^source\d*/);
+       next unless ($t =~ /^(?:source|patch)\d*/);
        my $file = $parsed->{$t};
        $file =~ s/.*\///;
        next unless -B $file;
@@ -319,7 +319,7 @@ for my $spec (@specs) {
       }
     } else {
       for my $t (keys %$parsed) {
-       next unless ($t =~ /^source\d*/);
+       next unless ($t =~ /^(?:source|patch)\d*/);
        my $file = $parsed->{$t};
        $file =~ s/.*\///;
        if (!exists $files->{$file}) {