X-Git-Url: https://git.openstreetmap.org./rails.git/blobdiff_plain/a3eb48385bcf1465339d473c0c1657e075cd507d..8a020b3ec727b8c9fa4d819855469dd348e58ee7:/script/misc/update-wiki-pages?ds=sidebyside diff --git a/script/misc/update-wiki-pages b/script/misc/update-wiki-pages index 0bef30d03..d40708c96 100755 --- a/script/misc/update-wiki-pages +++ b/script/misc/update-wiki-pages @@ -3,20 +3,11 @@ use 5.010; use strict; use warnings; -use Pod::Usage (); -use Getopt::Long (); - -BEGIN { - eval "require MediaWiki::API; require YAML::XS;" or do { - print "You have to install some modules via CPAN to run this:\n"; - print " sudo cpanp MediaWiki::API YAML::XS\n"; - exit 1; - }; -} - +use Getopt::Long; +use Pod::Usage; use MediaWiki::API; +use Test::More qw(no_plan); use YAML::XS qw(Dump); -use Test::More 'no_plan'; =head1 NAME @@ -50,7 +41,9 @@ help() unless -f $out_file; # Get a API interface my $mw = MediaWiki::API->new(); ok($mw, "Got a MediaWiki API"); -$mw->{config}->{api_url} = 'http://wiki.openstreetmap.org/w/api.php'; +$mw->{config}->{api_url} = 'https://wiki.openstreetmap.org/w/api.php'; +$mw->{config}->{retries} = 5; +$mw->{config}->{retry_delay} = 30; # All our goodies my (%feature, %count); @@ -67,6 +60,12 @@ for my $lang ('', map { "${_}:" } qw[ Pt Fi De It HU Cz Fr RU Pl ]) { ok(1, " Got $cnt key pages"); $count{key} += $cnt; + # Key prefix pages + ok(1, " Getting key prefix pages"); + $cnt = stick_content_in_hash("key", "Template:${lang}KeyPrefixDescription", \%feature); + ok(1, " Got $cnt key prefix pages"); + $count{keyprefix} += $cnt; + # Value pages ok(1, " Getting value pages"); $cnt = stick_content_in_hash("tag", "Template:${lang}ValueDescription", \%feature); @@ -74,7 +73,7 @@ for my $lang ('', map { "${_}:" } qw[ Pt Fi De It HU Cz Fr RU Pl ]) { $count{value} += $cnt; } -ok(1, "Got a total of $count{$_} ${_}s") for qw[ key value ]; +ok(1, "Got a total of $count{$_} ${_}s") for qw[ key keyprefix value ]; # Dump to .yml file open my $out, ">", $out_file or die "Can't open file '$out_file' supplied on the command line";