added sqlite_unicode to force utf-8 from SQLite

[webpac2] / lib / WebPAC / Input / DBI.pm

diff --git a/lib/WebPAC/Input/DBI.pm b/lib/WebPAC/Input/DBI.pm
index 27bc462..069a0bf 100644 (file)
--- a/lib/WebPAC/Input/DBI.pm
+++ b/lib/WebPAC/Input/DBI.pm
@@ -52,6 +52,8 @@ sub new {
 
        my $dbh = DBI->connect( $self->dsn, $self->user, $self->passwd, { RaiseError => 1 } );
 
+       $dbh->{sqlite_unicode} = 1;
+
        $log->debug( "sql ",$self->path, "\n", $sql );
 
        my $sth = $dbh->prepare( $sql );