build: restore i18n-lua2po.pl and remove i18n-po2lua.pl

1 files changed, 0 insertions, 27 deletions

diff --git a/build/i18n-po2lua.pl b/build/i18n-po2lua.pl
deleted file mode 100755
index 5129055ffb..0000000000
--- a/build/i18n-po2lua.pl
+++ /dev/null
@@ -1,27 +0,0 @@
-#!/usr/bin/perl
-
-@ARGV == 2 || die "Usage: $0 <source-dir> <dest-dir>\n";
-
-my $source_dir  = shift @ARGV;
-my $target_dir  = shift @ARGV;
-
-if( ! -d $target_dir )
-{
-	system('mkdir', '-p', $target_dir);
-}
-
-if( open F, "find $source_dir -type f -name '*.po' |" )
-{
-	while( chomp( my $file = readline F ) )
-	{
-		my ( $lang, $basename ) = $file =~ m{.+/(\w+)/([^/]+)\.po$};
-		$lang = lc $lang;
-		$lang =~ s/_/-/g;
-
-		printf "Generating %-40s ", "$target_dir/$basename.$lang.lmo";
-		system("./build/po2lmo", $file, "$target_dir/$basename.$lang.lmo");
-		print ( -f "$target_dir/$basename.$lang.lmo" ? "done\n" : "empty\n" );
-	}
-
-	close F;
-}