diff options
| author | Florian Pritz <bluewind@xinu.at> | 2017-04-29 11:38:07 +0200 |
|---|---|---|
| committer | Florian Pritz <bluewind@xinu.at> | 2017-04-29 11:38:07 +0200 |
| commit | 8d185ef33f0db7aa8ef29050650072f4975f5eff (patch) | |
| tree | 05735d4a7aa72a5af723edda7efef6d0cd20bb1f /generate-mirror-mail.pl | |
| parent | 5a3ed6b2b5f12df8591386802f5d6484cb9bf561 (diff) | |
| download | bin-8d185ef33f0db7aa8ef29050650072f4975f5eff.tar.gz bin-8d185ef33f0db7aa8ef29050650072f4975f5eff.tar.xz | |
misc
Signed-off-by: Florian Pritz <bluewind@xinu.at>
Diffstat (limited to 'generate-mirror-mail.pl')
| -rwxr-xr-x | generate-mirror-mail.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generate-mirror-mail.pl b/generate-mirror-mail.pl index 58c00b5..75be78e 100755 --- a/generate-mirror-mail.pl +++ b/generate-mirror-mail.pl @@ -80,6 +80,7 @@ while (<>) { my $url = $_; chomp($url); die "Skipping non-mirror detail URL" if $url =~ m/\/[0-9]+(\/|$)/; + die "Skipping non-mirror detail URL" if $url eq "https://www.archlinux.org/mirrors/status/"; $mech->get($url."/json/"); my ($mirror_name) = ($url =~ m#/([^/]+)/?$#); |