summaryrefslogtreecommitdiffstats
path: root/tools
diff options
context:
space:
mode:
authorJonas Häggqvist <rasher@rasher.dk>2007-09-01 20:54:17 +0000
committerJonas Häggqvist <rasher@rasher.dk>2007-09-01 20:54:17 +0000
commit2c4438ac51b5fe3133b2fe7efae4a07fd2c76b4d (patch)
tree789069c5e958300febbf3d7d07f4758f9ae935ff /tools
parente0651718a0403ed87647c2f54ece74519be6d10d (diff)
downloadrockbox-2c4438ac51b5fe3133b2fe7efae4a07fd2c76b4d.tar.gz
rockbox-2c4438ac51b5fe3133b2fe7efae4a07fd2c76b4d.tar.bz2
rockbox-2c4438ac51b5fe3133b2fe7efae4a07fd2c76b4d.zip
Make genlang ignore leading and trailing whitespace in source and desc lines (not the strings). If this behavior is unwanted, feel free to revert.
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@14567 a1c6a512-1295-4272-9138-f99709370657
Diffstat (limited to 'tools')
-rwxr-xr-xtools/genlang11
1 files changed, 9 insertions, 2 deletions
diff --git a/tools/genlang b/tools/genlang
index 4c0a9d6564..9be77a6030 100755
--- a/tools/genlang
+++ b/tools/genlang
@@ -122,6 +122,13 @@ my $input = $ARGV[0];
my @m;
my $m="blank";
+sub trim {
+ my ($string) = @_;
+ $string =~ s/^\s+//;
+ $string =~ s/\s+$//;
+ return $string;
+}
+
sub match {
my ($string, $pattern)=@_;
@@ -302,7 +309,7 @@ sub compare {
for my $l (@$locref) {
if($l =~ /^ *desc: (.*)/) {
$ldesc=$1;
- if($edesc ne $ldesc) {
+ if(trim($edesc) ne trim($ldesc)) {
$l = "### The 'desc' field differs from the english!\n### the previously used desc is commented below:\n### desc: $ldesc\n desc: $edesc\n";
}
push @show, $l;
@@ -315,7 +322,7 @@ sub compare {
if($l =~ / *\<\/source\>/i) {
$mode = 0;
print @show;
- if($esource ne $lsource) {
+ if(trim($esource) ne trim($lsource)) {
print "### The <source> section differs from the english!\n",
"### the previously used one is commented below:\n";
for(split("\n", $lsource)) {