X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/6fb7bcc9f1e00bc068a4514a3c7fa599119e6e06..c7771eecd629e21fc58d0a00ede0eb4b6615c715:/SL/Auth.pm

diff --git a/SL/Auth.pm b/SL/Auth.pm
index fca3b8b2c..8b8d859ae 100644
--- a/SL/Auth.pm
+++ b/SL/Auth.pm
@@ -256,7 +256,7 @@ sub create_database {
   my $encoding   = $Common::charset_to_db_encoding{$charset};
   $encoding    ||= 'UNICODE';
 
-  my $dbh        = SL::DBConnect->connect($dsn, $params{superuser}, $params{superuser_password}, { pg_enable_utf8 => $charset =~ m/^utf-?8$/i });
+  my $dbh        = SL::DBConnect->connect($dsn, $params{superuser}, $params{superuser_password}, { pg_enable_utf8 => scalar($charset =~ m/^utf-?8$/i) });
 
   if (!$dbh) {
     $main::form->error($main::locale->text('The connection to the template database failed:') . "\n" . $DBI::errstr);