X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FLocale.pm;h=c45a1a1f145139ff2c61aead0fce1f08b9af561f;hb=b56b3f5f97fc9a721506e54c1c3eb900e6c6dfcc;hp=b1c8205e8cd1aaae80b6715e76f11eafb7ded05e;hpb=a873249c8c3c32006540d8636102c195dd4d9448;p=kivitendo-erp.git diff --git a/SL/Locale.pm b/SL/Locale.pm index b1c8205e8..c45a1a1f1 100644 --- a/SL/Locale.pm +++ b/SL/Locale.pm @@ -109,6 +109,7 @@ sub _init { $self->{iconv_english} = SL::Iconv->new('ASCII', $db_charset); $self->{iconv_iso8859} = SL::Iconv->new('ISO-8859-15', $db_charset); $self->{iconv_to_iso8859} = SL::Iconv->new($db_charset, 'ISO-8859-15'); + $self->{iconv_utf8} = SL::Iconv->new('UTF-8', $db_charset); $self->_read_special_chars_file($country); @@ -231,6 +232,7 @@ sub findsub { my ($self, $text) = @_; my $text_rev = lc $self->{iconv_reverse}->convert($text); + $text_rev =~ s/[\s\-]+/_/g; if (!$self->{texts_reverse}) { $self->{texts_reverse} = { }; @@ -240,7 +242,7 @@ sub findsub { $original =~ s/_+/_/g; $translation = lc $translation; - $translation =~ s/\s+/_/g; + $translation =~ s/[\s\-]+/_/g; $self->{texts_reverse}->{$translation} ||= [ ]; push @{ $self->{texts_reverse}->{$translation} }, $original; @@ -495,4 +497,10 @@ sub restore_numberformat { $myconfig->{numberformat} = $self->{saved_numberformat} if $self->{saved_numberformat}; } +sub get_local_time_zone { + my $self = shift; + $self->{local_time_zone} ||= DateTime::TimeZone->new(name => 'local'); + return $self->{local_time_zone}; +} + 1;