From 5096c1292c4a55a53e96c25f7037286ed988f07b Mon Sep 17 00:00:00 2001 From: plegall Date: Fri, 9 Apr 2010 18:17:50 +0000 Subject: merge back r5740, I should have commited only the galleries directory git-svn-id: http://piwigo.org/svn/trunk@5741 68402e56-0260-453c-a942-63ccdbb3a9ee --- tools/missing_keys.pl | 24 ++++++++++++------------ 1 file changed, 12 insertions(+), 12 deletions(-) (limited to 'tools/missing_keys.pl') diff --git a/tools/missing_keys.pl b/tools/missing_keys.pl index 1b83dacb1..7f657a41d 100644 --- a/tools/missing_keys.pl +++ b/tools/missing_keys.pl @@ -14,14 +14,14 @@ my $type = $ARGV[1]; # common, admin, install, upgrade find(\&used_keys, $piwigo_dir); load_registered_keys($type); -foreach my $key (sort keys %used_keys) { - # print "{".$key."}", ' is used', "\n"; +# 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"; - } -} +# if (not defined $registered_keys{$key}) { +# # print "{".$key."}", ' is missing', "\n"; +# print '$lang[\''.$key.'\'] = \''.$key.'\';', "\n"; +# } +# } my %ignore_keys = ( '%d new image' => 1, @@ -74,11 +74,11 @@ my %ignore_keys = ( ); -# foreach my $key (sort keys %registered_keys) { -# if (not defined $used_keys{$key} and not defined $ignore_keys{$key}) { -# print "{".$key."}", ' is not used anywhere', "\n"; -# } -# } +foreach my $key (sort keys %registered_keys) { + if (not defined $used_keys{$key} and not defined $ignore_keys{$key}) { + print "{".$key."}", ' is not used anywhere', "\n"; + } +} sub used_keys { if ($File::Find::name !~ m/(tpl|php)$/) { -- cgit v1.2.3