Force English locale for all tests

Force use of English in tests for the moment, for those users that
have a different locale set, since errors are hardcoded in the test files
This commit is contained in:
Duncan Ferguson 2015-11-28 12:38:39 +00:00
parent 7706fdc45e
commit dc041e730d
5 changed files with 25 additions and 0 deletions

View file

@ -1,6 +1,11 @@
use strict;
use warnings;
# Force use of English in tests for the moment, for those users that
# have a different locale set, since errors are hardcoded below
use POSIX qw(setlocale locale_h);
setlocale( LC_ALL, "C" );
package Test::ClusterSSH::Mock;
# generate purpose object used to simplfy testing

View file

@ -1,6 +1,11 @@
use strict;
use warnings;
# Force use of English in tests for the moment, for those users that
# have a different locale set, since errors are hardcoded below
use POSIX qw(setlocale locale_h);
setlocale( LC_ALL, "C" );
use FindBin qw($Bin);
use lib "$Bin/../lib";

View file

@ -1,6 +1,11 @@
use strict;
use warnings;
# Force use of English in tests for the moment, for those users that
# have a different locale set, since errors are hardcoded below
use POSIX qw(setlocale locale_h);
setlocale( LC_ALL, "C" );
use FindBin qw($Bin $Script);
use lib "$Bin/../lib";

View file

@ -1,6 +1,11 @@
use strict;
use warnings;
# Force use of English in tests for the moment, for those users that
# have a different locale set, since errors are hardcoded below
use POSIX qw(setlocale locale_h);
setlocale( LC_ALL, "C" );
use FindBin qw($Bin $Script);
use lib "$Bin/../lib";

View file

@ -1,6 +1,11 @@
use strict;
use warnings;
# Force use of English in tests for the moment, for those users that
# have a different locale set, since errors are hardcoded below
use POSIX qw(setlocale locale_h);
setlocale( LC_ALL, "C" );
use FindBin qw($Bin $Script);
use lib "$Bin/../lib";