From 38723e017d0984d5d9a1ac2a8cd78a363f450ab4 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sat, 22 May 2010 19:55:01 +0200 Subject: Actually use the next_link for comirror --- bin/comirror-setup | 2 ++ 1 file changed, 2 insertions(+) (limited to 'bin/comirror-setup') diff --git a/bin/comirror-setup b/bin/comirror-setup index 05661bf..f5d4c76 100755 --- a/bin/comirror-setup +++ b/bin/comirror-setup @@ -39,6 +39,7 @@ print "\nComparing images"; for my $i ( 0 .. $#mechs ) { for my $image ($mechs[$i]->find_all_images()) { push(@{$images[$i]}, $image->url_abs()); + say "$i $images[$i]->[-1]"; } print q{.}; } @@ -94,6 +95,7 @@ for my $offset ( 0 .. $length ) { line_to_file($ARGV[0], 'last_uri'); line_to_file($image_re, 'image_re'); +line_to_file($next_link, 'next_link'); print "\nimage_re: ${image_re}\n\n"; say "\"next\" link text: ${next_link}"; -- cgit v1.2.3