X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/dd0ba7b9a6f931ce13ced906d9cc6cb3e7c3ea3a..291f709e009d48ea15ed1886fbb367c4bbaf7aa6:/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;