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