Set LC_NUMERIC to C explicitly

This commit is contained in:
Piotr Roszatycki 2013-11-01 09:42:22 +01:00
parent d7656f5fdc
commit 94a4697f26

View File

@ -10,6 +10,7 @@ BEGIN {
use Getopt::Long qw(:config no_auto_abbrev); use Getopt::Long qw(:config no_auto_abbrev);
use List::Util qw(first); use List::Util qw(first);
use POSIX qw(setlocale LC_NUMERIC);
use Slic3r; use Slic3r;
$|++; $|++;
@ -84,6 +85,7 @@ if (!@ARGV && !$opt{save} && eval "require Slic3r::GUI; 1") {
$Slic3r::GUI::autosave = $opt{autosave}; $Slic3r::GUI::autosave = $opt{autosave};
} }
$gui = Slic3r::GUI->new; $gui = Slic3r::GUI->new;
setlocale(LC_NUMERIC, 'C');
$gui->{skeinpanel}->load_config_file($_) for @{$opt{load}}; $gui->{skeinpanel}->load_config_file($_) for @{$opt{load}};
$gui->{skeinpanel}->load_config($cli_config); $gui->{skeinpanel}->load_config($cli_config);
$gui->MainLoop; $gui->MainLoop;