aboutsummaryrefslogtreecommitdiffstats
path: root/tests/findlang.pl
diff options
context:
space:
mode:
authorOlivier Thauvin <nanardon@mandriva.org>2007-09-05 15:37:15 +0000
committerOlivier Thauvin <nanardon@mandriva.org>2007-09-05 15:37:15 +0000
commit81ef1e9d043f826db9c00234d32a45f0e6eac186 (patch)
tree813ea06c5104f07875fbc09cf39faa26b884e2d4 /tests/findlang.pl
parentfab597ad1c1ec6014d3ec9b72e5defd6bc8096b9 (diff)
downloadrpm-setup-81ef1e9d043f826db9c00234d32a45f0e6eac186.tar
rpm-setup-81ef1e9d043f826db9c00234d32a45f0e6eac186.tar.gz
rpm-setup-81ef1e9d043f826db9c00234d32a45f0e6eac186.tar.bz2
rpm-setup-81ef1e9d043f826db9c00234d32a45f0e6eac186.tar.xz
rpm-setup-81ef1e9d043f826db9c00234d32a45f0e6eac186.zip
- include file be file except with --all-name
Diffstat (limited to 'tests/findlang.pl')
-rw-r--r--tests/findlang.pl15
1 files changed, 11 insertions, 4 deletions
diff --git a/tests/findlang.pl b/tests/findlang.pl
index fa6dbae..d601728 100644
--- a/tests/findlang.pl
+++ b/tests/findlang.pl
@@ -12,11 +12,17 @@ my $testarbo = "$pwd/find-lang-root";
my %files = (
# file => [ lang, is_%dir ]
- '/usr/share/man/fr' => [ 'fr', 0 ],
- '/usr/share/locale/pt_BR' => [ 'pt_BR', 0 ],
- '/usr/share/gnome/help/lang/pt_BR' => [ 'pt_BR', 0 ],
- '/usr/share/gnome/help/lang/en_GB' => [ 'en_GB', 0 ],
+ '/usr/share/man/fr' => [ 'fr', 1 ],
+ '/usr/share/man/fr/man1' => [ 'fr', 1 ],
+ '/usr/share/man/fr/man1/lang.1.*' => [ 'fr', 0 ],
+ '/usr/share/locale/pt_BR' => [ 'pt_BR', 1 ],
+ '/usr/share/gnome/help/lang/pt_BR' => [ 'pt_BR', 1 ],
+ '/usr/share/gnome/help/lang/pt_BR/any.html' => [ 'pt_BR', 0 ],
+ '/usr/share/gnome/help/lang/en_GB' => [ 'en_GB', 1 ],
+ '/usr/share/gnome/help/lang/en_GB/any.html' => [ 'en_GB', 0 ],
'/usr/share/gnome/help/lang' => [ '', 1 ],
+ '/usr/share/locale/pt_BR/LC_MESSAGES' => [ 'pt_BR', 1 ],
+ '/usr/share/locale/pt_BR/LC_MESSAGES/lang.mo' => [ 'pt_BR', 0 ],
);
system("/usr/bin/perl find-lang.pl $testarbo lang --with-man --with-gnome") and die "can't run find-lang $@";
@@ -31,6 +37,7 @@ while (my $line = <$h>) {
$lang ||= '';
my $dir = $line =~ /%dir/;
$dir ||= 0;
+ print STDERR "$file\n";
is($lang, $files{$file}[0], "lang is find");
is($dir, $files{$file}[1], "%dir is properly set if need");
}