diff options
Diffstat (limited to 'config-db/OpenSLX/DBSchema.pm')
| -rw-r--r-- | config-db/OpenSLX/DBSchema.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/config-db/OpenSLX/DBSchema.pm b/config-db/OpenSLX/DBSchema.pm index d93d4f21..88bbc1a8 100644 --- a/config-db/OpenSLX/DBSchema.pm +++ b/config-db/OpenSLX/DBSchema.pm @@ -208,9 +208,10 @@ $DbSchema = { ### 'cols' => contains a full list of resulting column descriptions ################################################################################ -my $lang = setlocale(LC_LANG); +use POSIX qw(locale_h); +my $lang = setlocale(LC_MESSAGES); my $country; -if ($lang =~ m[\w\w_(\w\w)]) { +if ($lang =~ m[^\w\w_(\w\w)]) { $country = lc($1); } else { $country = 'us'; |