diff options
| author | François Revel <mmu_man@netsurf-browser.org> | 2012-04-12 16:42:02 +0000 |
|---|---|---|
| committer | François Revel <mmu_man@netsurf-browser.org> | 2012-04-12 16:42:02 +0000 |
| commit | 480282085f0039dcefa12a41a42bd97a61b3b264 (patch) | |
| tree | a213230d8a794a075923d9fdc726fdf723ec1feb | |
| parent | cdee9e985ee4d29d624539e47aa515b5201a18e3 (diff) | |
| download | netsurf-480282085f0039dcefa12a41a42bd97a61b3b264.tar.gz netsurf-480282085f0039dcefa12a41a42bd97a61b3b264.tar.bz2 | |
Make sure we use the default locale before parsing output of a localized program.
This fixes generating the testament here.
svn path=/trunk/netsurf/; revision=13857
| -rwxr-xr-x | utils/svn-testament.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/utils/svn-testament.pl b/utils/svn-testament.pl index 96bbd7c44..50f8ae8eb 100755 --- a/utils/svn-testament.pl +++ b/utils/svn-testament.pl @@ -61,7 +61,7 @@ sub gather_output { } if ( $svn_present ) { - foreach my $line (split(/\n/, gather_output("svn info $root"))) { + foreach my $line (split(/\n/, gather_output("LC_ALL=C svn info $root"))) { my ($key, $value) = split(/: /, $line, 2); $key = lc($key); $key =~ s/\s+//g; @@ -76,7 +76,7 @@ if ( $svn_present ) { my %svnstatus; # The SVN status output if ( $svn_present ) { - foreach my $line (split(/\n/, gather_output("svn status $root"))) { + foreach my $line (split(/\n/, gather_output("LC_ALL=C svn status $root"))) { chomp $line; my $op = substr($line, 0, 1); if ($op eq ' ' && substr($line, 1, 1) ne ' ') { $op = "p"; } |