Add support for ftp
authorAlexander Wirt <formorer@debian.org>
Wed, 2 Nov 2011 07:57:24 +0000 (08:57 +0100)
committerAlexander Wirt <formorer@debian.org>
Wed, 2 Nov 2011 07:57:24 +0000 (08:57 +0100)
masterlist2mirmon

index f191686..ff33375 100755 (executable)
@@ -28,4 +28,9 @@ while (my $line = <$fh>) {
 foreach my $mirror (@mirrors) {
     my ($c, $r) = split (/ +/, $mirror->{'country'});
     printf ("%s http://%s%s\n", $c, $mirror->{'site'}, $mirror->{'grml-http'});
+    if ($mirror->{'grml-ftp'}) {
+        printf ("%s ftp://%s%s\n", $c, $mirror->{'site'}, $mirror->{'grml-ftp'});
+    }
+
+
 }