Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 04b7fa25

Von Moritz Bunkus vor fast 14 Jahren hinzugefügt

  • ID 04b7fa253664ff8057db427b63d737329b4e59af
  • Vorgänger 673c231d
  • Nachfolger 67323585

Auch Template-Plugins nach $locale->text() durchsuchen

Conflicts:

locale/de/all
scripts/locales.pl

Unterschiede anzeigen:

scripts/locales.pl
31 31
my $basedir      = "../..";
32 32
my $locales_dir  = ".";
33 33
my $bindir       = "$basedir/bin/mozilla";
34
my @progdirs     = ( "$basedir/SL/Template/Plugin" );
34 35
my $dbupdir      = "$basedir/sql/Pg-upgrade";
35 36
my $dbupdir2     = "$basedir/sql/Pg-upgrade2";
36 37
my $menufile     = "menu.ini";
......
42 43
init();
43 44

  
44 45
opendir DIR, "$bindir" or die "$!";
45
my @progfiles = grep { /\.pl$/ && !/(_custom|^\.)/ } readdir DIR;
46
my @progfiles = map { [ $_, $bindir ] } grep { /\.pl$/ && !/(_custom|^\.)/ } readdir DIR;
46 47
seekdir DIR, 0;
47 48
my @customfiles = grep /_custom/, readdir DIR;
48 49
closedir DIR;
49 50

  
51
foreach my $dir (@progdirs) {
52
  opendir DIR, $dir or die "$!";
53
  push @progfiles, map { [ $_, $dir ] } grep { /\.pm$/ } readdir DIR;
54
  closedir DIR;
55
}
56

  
50 57
# put customized files into @customfiles
51 58
my @menufiles;
52 59

  
......
91 98

  
92 99
my %old_texts = %{ $self->{texts} || {} };
93 100

  
94
map({ handle_file($_, $bindir); } @progfiles);
101
map({ handle_file(@{ $_ }); } @progfiles);
95 102
map({ handle_file($_, $dbupdir); } @dbplfiles);
96 103
map({ handle_file($_, $dbupdir2); } @dbplfiles2);
97 104

  

Auch abrufbar als: Unified diff