# # # patch "Monotone/AutomateStdio.pm" # from [5e284db952c56e803a6008ea1a8880b06393f346] # to [7152213b7464b06ad72524cea2c006f5589959f2] # ============================================================ --- Monotone/AutomateStdio.pm 5e284db952c56e803a6008ea1a8880b06393f346 +++ Monotone/AutomateStdio.pm 7152213b7464b06ad72524cea2c006f5589959f2 @@ -47,6 +47,7 @@ require 5.008; require 5.008; +no locale; use integer; use strict; use warnings; @@ -2602,6 +2603,12 @@ sub startup($) my $version; + # Switch to the default locale. We only want to parse the output from + # Monotone in one language! + + local $ENV{LC_ALL} = "C"; + local $ENV{LANG} = "C"; + if ($this->{mtn_pid} == 0) { $this->{mtn_err} = gensym();