X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=scripts%2Flocales.pl;h=cd5fe41b9f7db8e174d586c7b84f71dd2277203f;hb=593a71851023f5b248fff933d6cc00ff4cfce90d;hp=e63b1b7b9e3e71b638afc6b2f37357d075fd2e86;hpb=9b36c5639d01f1c9059381c12fac5d57ff614710;p=kivitendo-erp.git diff --git a/scripts/locales.pl b/scripts/locales.pl index e63b1b7b9..cd5fe41b9 100755 --- a/scripts/locales.pl +++ b/scripts/locales.pl @@ -9,6 +9,11 @@ use utf8; use strict; +BEGIN { + unshift(@INC, 'modules/override'); # Use our own versions of various modules (e.g. YAML). + push (@INC, 'modules/fallback'); # Only use our own versions of modules if there's no system version. +} + use Carp; use Cwd; use Data::Dumper; @@ -34,7 +39,7 @@ my $basedir = "../.."; my $locales_dir = "."; my $bindir = "$basedir/bin/mozilla"; my @progdirs = ( "$basedir/SL" ); -my @menufiles = ("${basedir}/menu.ini", "${basedir}/admin-menu.ini"); +my @menufiles = <${basedir}/menus/*.ini>; my @javascript_dirs = ($basedir .'/js', $basedir .'/templates/webpages'); my $javascript_output_dir = $basedir .'/js'; my $submitsearch = qr/type\s*=\s*[\"\']?submit/i; @@ -43,7 +48,7 @@ our $missing = {}; our @lost = (); my %ignore_unused_templates = ( - map { $_ => 1 } qw(common/help_overlay.html ct/testpage.html generic/autocomplete.html oe/periodic_invoices_email.txt part/testpage.html t/render.html t/render.js) + map { $_ => 1 } qw(ct/testpage.html generic/autocomplete.html oe/periodic_invoices_email.txt part/testpage.html t/render.html t/render.js) ); my (%referenced_html_files, %locale, %htmllocale, %alllocales, %cached, %submit, %jslocale); @@ -633,7 +638,7 @@ sub scan_javascript_file { while( my $line = readline($fh) ) { while( $line =~ m/ - kivi.t8 + \bk(?:ivi)?.t8 \s* \( \s*