Revision b6ae20da
Von Moritz Bunkus vor etwa 14 Jahren hinzugefügt
| locale/de/all | ||
|---|---|---|
|
'Incoming Payments' => 'Zahlungseingänge',
|
||
|
'Incoming invoice number' => 'Eingangsrechnungsnummer',
|
||
|
'Incorrect Password!' => 'Ungültiges Passwort!',
|
||
|
'Incorrect password!.' => 'Ungültiges Passwort!.',
|
||
|
'Incorrect username or password!' => 'Ungültiger Benutzername oder falsches Passwort!',
|
||
|
'Increase' => 'Erhöhen',
|
||
|
'Individual Items' => 'Einzelteile',
|
||
| ... | ... | |
|
'Supplies' => 'Lieferungen',
|
||
|
'Switch Menu on / off' => 'Menü ein- / ausklappen',
|
||
|
'System' => 'System',
|
||
|
'System currently down for maintenance!' => 'Lx-Office ist momentan zwecks Wartungsarbeiten nicht zugänglich.',
|
||
|
'TODO list' => 'Aufgabenliste',
|
||
|
'TODO list options' => 'Aufgabenlistenoptionen',
|
||
|
'TOP100' => 'Top 100',
|
||
| ... | ... | |
|
'[email]' => '[email]',
|
||
|
'account_description' => 'Beschreibung',
|
||
|
'accrual' => 'Bilanzierung (Soll-Versteuerung)',
|
||
|
'action= not defined!' => 'action= nicht definiert!',
|
||
|
'active' => 'aktiv',
|
||
|
'all entries' => 'alle Einträge',
|
||
|
'ap_aging_list' => 'liste_offene_verbindlichkeiten',
|
||
| scripts/locales.pl | ||
|---|---|---|
|
my $basedir = "../..";
|
||
|
my $locales_dir = ".";
|
||
|
my $bindir = "$basedir/bin/mozilla";
|
||
|
my @progdirs = ( "$basedir/SL/Controller", "$basedir/SL/Template/Plugin", "$basedir/SL/Auth" );
|
||
|
my @progdirs = ( "$basedir/SL" );
|
||
|
my $dbupdir = "$basedir/sql/Pg-upgrade";
|
||
|
my $dbupdir2 = "$basedir/sql/Pg-upgrade2";
|
||
|
my $menufile = "menu.ini";
|
||
| ... | ... | |
|
|
||
|
init();
|
||
|
|
||
|
opendir DIR, "$bindir" or die "$!";
|
||
|
my @progfiles = map { [ $_, $bindir ] } grep { /\.pl$/ && !/(_custom|^\.)/ } readdir DIR;
|
||
|
seekdir DIR, 0;
|
||
|
my @customfiles = grep /_custom/, readdir DIR;
|
||
|
closedir DIR;
|
||
|
sub find_files {
|
||
|
my ($dir_name, $files) = @_;
|
||
|
|
||
|
foreach my $dir (@progdirs) {
|
||
|
opendir DIR, $dir or die "$!";
|
||
|
push @progfiles, map { [ $_, $dir ] } grep { /\.pm$/ } readdir DIR;
|
||
|
closedir DIR;
|
||
|
$files ||= [];
|
||
|
|
||
|
my @dirs_to_check;
|
||
|
|
||
|
opendir my $dir, $dir_name or die "$! $dir_name";
|
||
|
|
||
|
foreach my $name (readdir $dir) {
|
||
|
next if $name eq '.' || $name eq '..';
|
||
|
|
||
|
my $full_name = "${dir_name}/${name}";
|
||
|
if (-d $full_name) {
|
||
|
push @dirs_to_check, $full_name;
|
||
|
} else {
|
||
|
push @{ $files }, $full_name;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
closedir $dir;
|
||
|
|
||
|
map { find_files($_, $files) } @dirs_to_check;
|
||
|
|
||
|
return @{ $files };
|
||
|
}
|
||
|
|
||
|
my @bindir_files = find_files($bindir);
|
||
|
my @progfiles = map { m:^(.+)/([^/]+)$:; [ $2, $1 ] } grep { /\.pl$/ && !/_custom/ } @bindir_files;
|
||
|
my @customfiles = grep /_custom/, @bindir_files;
|
||
|
|
||
|
push @progfiles, map { m:^(.+)/([^/]+)$:; [ $2, $1 ] } grep { /\.pm$/ } map { find_files($_) } @progdirs;
|
||
|
|
||
|
# put customized files into @customfiles
|
||
|
my @menufiles;
|
||
|
|
||
Auch abrufbar als: Unified diff
Alle Dateien in SL rekursiv nach Übersetzungen durchsuchen