adam/Piwigo
1
0
Fork 0
mirror of https://github.com/Piwigo/Piwigo.git synced 2026-07-21 00:53:04 +02:00
Code Issues Packages Projects Releases Wiki Activity

improvement: piwigo_dir can be set from the command line

Browse Source 
bug fixed: changing filters for files to check.

git-svn-id: http://piwigo.org/svn/trunk@5296 68402e56-0260-453c-a942-63ccdbb3a9ee
This commit is contained in:
plegall
2010-03-23 21:50:48 +00:00
parent ed6518319b
commit feb0d27a51
1 changed files with 9 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files
tools/missing_keys.pl
+9 -6
View File
@@ -8,8 +8,8 @@ use File::Find;
our %used_keys = ();
our %registered_keys = ();
my $piwigo_dir = '/home/pierrick/public_html/piwigo/dev/trunk';
my $type = $ARGV[0]; # common, admin, install, upgrade
my $piwigo_dir = $ARGV[0]; # '/home/pierrick/public_html/piwigo/dev/trunk';
my $type = $ARGV[1]; # common, admin, install, upgrade
find(\&used_keys, $piwigo_dir);
load_registered_keys($type);
@@ -18,8 +18,8 @@ foreach my $key (sort keys %used_keys) {
# print "{".$key."}", ' is used', "\n";
if (not defined $registered_keys{$key}) {
print "{".$key."}", ' is missing', "\n";
# print '$lang[\''.$key.'\'] = \''.$key.'\';', "\n";
# print "{".$key."}", ' is missing', "\n";
print '$lang[\''.$key.'\'] = \''.$key.'\';', "\n";
}
}
@@ -34,7 +34,7 @@ sub used_keys {
return 0;
}
if ($File::Find::name =~ m{/(plugins|language)/}) {
if ($File::Find::name =~ m{/(plugins|language|_data)/}) {
return 0;
}
@@ -69,6 +69,9 @@ sub used_keys {
if ($File::Find::name =~ m{/admin/}) {
$is_admin = 1;
}
if ($File::Find::name =~ m{/admin\.php$}) {
$is_admin = 1;
}
if (not $is_admin) {
return 0;
@@ -82,7 +85,7 @@ sub used_keys {
if ($File::Find::name =~ m{/install(\.tpl|\.php|/)}) {
return 0;
}
if ($File::Find::name =~ m{/admin/} or $File::Find::name =~ m{themes/default/template/mail}) {
if ($File::Find::name =~ m{/admin(/|\.php)} or $File::Find::name =~ m{themes/default/template/mail}) {
return 0;
}
}