[projects/distfiles/patchset] - use print_source, so the url be validated

[glen]

commit ca6092e66f0565c4cd82b3f37e471ba8295e53ef
Author: Elan Ruusamäe <glen at delfi.ee>
Date:   Fri Nov 30 10:15:29 2012 +0200

    - use print_source, so the url be validated

 specparser.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)
---
diff --git a/specparser.pl b/specparser.pl
index e2274e9..07d4611 100755
--- a/specparser.pl
+++ b/specparser.pl
@@ -24,6 +24,8 @@ my @sources;
 my $sources;
 my %patchset;
 
+sub print_source($$$);
+
 sub next_spec($)
 {
     $spec = shift;
@@ -156,7 +158,7 @@ sub process_patchset($) {
         my $url = sprintf($patchset{pattern}, $i);
         my ($basename) = $url =~ m{/([^/]+$)};
         my $hash = $files{$basename} or next;
-        printf "%s %s\n", $hash, $url;
+        print_source "patchset $i", $hash, $url;
     }
 }
 
================================================================

---- gitweb:

http://git.pld-linux.org/gitweb.cgi/projects/distfiles.git/commitdiff/ca6092e66f0565c4cd82b3f37e471ba8295e53ef