my ($lang) = @_;
my $mech = WWW::Mechanize->new;
- $mech->get("http://translatewiki.net/w/i.php?title=Special%3ATranslate&task=export-to-file&group=out-osm&language=$lang");
+ $mech->get("http://translatewiki.net/w/i.php?title=Special%3ATranslate&task=export-to-file&group=out-osm-site&language=$lang");
die "Couldn't get lang $lang lang from Translatewiki" unless $mech->success;
{
my $mech = WWW::Mechanize->new;
- $mech->get('http://translatewiki.net/wiki/Translating:OpenStreetMap/stats/trunk');
+ $mech->get('http://translatewiki.net/wiki/Translating:OpenStreetMap/stats/trunk/site');
die "Couldn't get translatewiki table" unless $mech->success;