comment out dupe purging debug message

[rails.git] / script / locale / merge-from-translatewiki

diff --git a/script/locale/merge-from-translatewiki b/script/locale/merge-from-translatewiki
index e3608acbfb6da4116d3f08774e57a8d8b93c58b3..1dadb4ff3715a005f9384d7091faa6d5e4071f03 100644 (file)
--- a/script/locale/merge-from-translatewiki
+++ b/script/locale/merge-from-translatewiki
@@ -207,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) {
         # 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 };
             }
         }
                 delete $new{ $new_k };
             }
         }


@@ -317,8 +317,8 @@ sub get_translatewiki_translations
 {
     my @languages = @_;
 
 {
     my @languages = @_;
 

+    my $cache_file = "/tmp/merge-from-translatewiki.storable";

     if ($cache) {
     if ($cache) {

-        my $cache_file = "/tmp/merge-from-translatewiki.storable";

         if (-f $cache_file) {
             my $c = retrieve($cache_file);
             return %$c;
         if (-f $cache_file) {
             my $c = retrieve($cache_file);
             return %$c;