Made default language configurable (language.conf)

CVS version numbers

check_trans.pl: 1.5 -> 1.6

1 files changed, 13 insertions, 1 deletions

diff --git a/check_trans.pl b/check_trans.pl
index f49b4d65560..2abe4f8866a 100755
--- a/check_trans.pl
+++ b/check_trans.pl
@@ -36,8 +36,20 @@ warn "Checking subtree $opt_s only\n" if $opt_v;
 # include only files matching $filename
 $filename = $opt_p || '(\.wml$)|(\.html$)';
 
+# get configuration
+if (open CONF, "<language.conf")
+{
+	$defaultlanguage = <CONF>;
+	chomp $defaultlanguage;
+	close CONF;
+}
+else
+{
+	$defaultlanguage = 'italian';
+}
+
 $from = 'english';
-$to = shift || 'italian';
+$to = shift || $defaultlanguage;
 
 $from = "$from/$opt_s";
 $to = "$to/$opt_s";