X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/06132987e7468eca8ca7dc6dbb55982ee5c14785..c6b2257945060625bcb86fa7e2efd27c737480ff:/SL/DBConnect.pm diff --git a/SL/DBConnect.pm b/SL/DBConnect.pm index 4e084502a..8dc978758 100644 --- a/SL/DBConnect.pm +++ b/SL/DBConnect.pm @@ -20,4 +20,14 @@ sub connect { return DBIx::Log4perl->connect(@_); } +sub get_options { + my $self = shift; + my $options = { + pg_enable_utf8 => $::locale->is_utf8, + @_ + }; + + return $options; +} + 1;