L10N: Remove all translations

TODO: Intern strings again to simplify the code.

The immediate effect of this commit is that starting the util/vndb.pl
script and generating the JS file is much faster now and that vndb.pl
uses less memory. Translations have already been disabled on the main
VNDB for a week now.

1 files changed, 1 insertions, 91 deletions

diff --git a/lib/VNDB/L10N.pm b/lib/VNDB/L10N.pm
index edc22532..2e6a32bd 100644
--- a/lib/VNDB/L10N.pm
+++ b/lib/VNDB/L10N.pm
@@ -11,7 +11,7 @@ use warnings;
 
   # used for the language switch interface, language tags must
   # be the same as in the languages hash in global.pl
-  sub languages { qw{ cs de en es hu it nl ru tr uk } }
+  sub languages { qw{ en } }
 
   sub maketext {
     my $r = eval { shift->SUPER::maketext(@_) };
@@ -126,95 +126,5 @@ use warnings;
   sub br { return '<br />' }
 }
 
-
-
-{
-  package VNDB::L10N::cs;
-  use base 'VNDB::L10N::en';
-  our %Lexicon;
-
-  sub quant {
-    my($self, $num, $single, $couple, $lots) = @_;
-    return $lots   if ($num % 100) >= 11 && ($num % 100) <= 14;
-    return $single if ($num % 10) == 1;
-    return $couple if ($num % 10) >= 2 && ($num % 10) <= 4;
-    return $lots;
-  }
-}
-
-
-
-{
-  package VNDB::L10N::de;
-  use base 'VNDB::L10N::en';
-  our %Lexicon;
-}
-
-
-
-{
-  package VNDB::L10N::hu;
-  use base 'VNDB::L10N::en';
-  our %Lexicon;
-}
-
-
-
-{
-  package VNDB::L10N::nl;
-  use base 'VNDB::L10N::en';
-  our %Lexicon;
-}
-
-
-
-{
-  package VNDB::L10N::ru;
-  use base 'VNDB::L10N::en';
-  our %Lexicon;
-
-  sub quant {
-    my($self, $num, $single, $couple, $lots) = @_;
-    return $single if ($num % 10) == 1 && ($num % 100) != 11;
-    return $couple if ($num % 10) >= 2 && ($num % 10) <= 4 && !(($num % 100) >= 12 && ($num % 100) <= 14);
-    return $lots;
-  }
-}
-
-
-
-{
-  package VNDB::L10N::uk;
-  use base 'VNDB::L10N::en';
-  our %Lexicon;
-  *quant = \&VNDB::L10N::ru::quant;
-}
-
-
-
-{
-  package VNDB::L10N::es;
-  use base 'VNDB::L10N::en';
-  our %Lexicon;
-}
-
-
-
-{
-  package VNDB::L10N::it;
-  use base 'VNDB::L10N::en';
-  our %Lexicon;
-}
-
-
-
-{
-  package VNDB::L10N::tr;
-  use base 'VNDB::L10N::en';
-  our %Lexicon;
-}
-
-
-
 1;