Make genlang rewrite english.list if it exists but is older than english.lang

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@30056 a1c6a512-1295-4272-9138-f99709370657
This commit is contained in:
Jens Arnold 2011-06-23 06:42:08 +00:00
parent dc0abc7744
commit a7bedc5e4f

View file

@ -237,7 +237,7 @@ sub readenglish {
if ($binary and file_is_newer("$binpath/english.list", $english)) {
open(ENG, "<$binpath/english.list") ||
open(ENG, "<$binpath/english.list") ||
die "Error: can't open $binpath/english.list";
while (<ENG>) {
my ($user, $id, $value) = split ':', $_;
@ -830,8 +830,8 @@ if($verbose) {
}
}
if ($binary and !-r "$binpath/english.list") {
open(ENGLIST, ">$binpath/english.list") ||
if ($binary and !file_is_newer("$binpath/english.list", $english)) {
open(ENGLIST, ">$binpath/english.list") ||
die "Failed creating $binpath/english.list";
for my $user (keys %users) {
for my $id (keys %{$idmap[$user]}) {