X-Git-Url: https://git.openstreetmap.org/rails.git/blobdiff_plain/ab878d4844f7db8a21465b19ec238ce608c1e772..95c8b2a01dcf6a9735ac3772a2e0d8bb86a4e561:/script/locale/merge-from-translatewiki diff --git a/script/locale/merge-from-translatewiki b/script/locale/merge-from-translatewiki index faf6750f9..1dadb4ff3 100644 --- a/script/locale/merge-from-translatewiki +++ b/script/locale/merge-from-translatewiki @@ -60,6 +60,11 @@ The locales dir we'll merge stuff into. F by default. Only import translations that don't exists for us yet. +=item --cache + +Write a L cache for things downloaded from Translatewiki and +use it if it exists. + =back =head1 AUTHOR @@ -75,6 +80,7 @@ Getopt::Long::Parser->new( 'h|help' => \my $help, 'locales-dir=s' => \(my $locales_dir = 'config/locales'), 'only-new' => \my $only_new, + 'cache' => \my $cache, ) or help(); # On --help @@ -201,7 +207,7 @@ for my $translatewiki_lang (sort @translatewiki_languages_codes) { # were there at import time. Nuke them. while (my ($new_k, $new_v) = each %new) { if (exists $en{ $new_k } and $en{ $new_k } eq $new_v) { - say "Purging dupe in $rails_lang: $new_k=$new_v"; + #say "Purging dupe in $rails_lang: $new_k=$new_v"; delete $new{ $new_k }; } } @@ -312,9 +318,11 @@ sub get_translatewiki_translations my @languages = @_; my $cache_file = "/tmp/merge-from-translatewiki.storable"; - if (-f $cache_file) { - my $cache = retrieve($cache_file); - return %$cache; + if ($cache) { + if (-f $cache_file) { + my $c = retrieve($cache_file); + return %$c; + } } my %translatewiki_languages; @@ -331,7 +339,9 @@ sub get_translatewiki_translations $translatewiki_languages{$lang} = $flat_data; } - store \%translatewiki_languages, $cache_file; + if ($cache) { + store \%translatewiki_languages, $cache_file; + } return %translatewiki_languages; }