Yet even more changes...

[kiriwrite/.git] / cgi-files / Modules / Database / SQLite.pm

diff --git a/cgi-files/Modules/Database/SQLite.pm b/cgi-files/Modules/Database/SQLite.pm
index 92bce19..270f8fa 100644 (file)
--- a/cgi-files/Modules/Database/SQLite.pm
+++ b/cgi-files/Modules/Database/SQLite.pm
@@ -30,7 +30,7 @@ use warnings;
 
 # Load the following Perl modules.
 
-use DBI qw();
+use DBI qw(:sql_types);
 
 # Set the following values.
 
@@ -1793,7 +1793,7 @@ sub connectfilter{
        # Connect to the template database.
 
        $filterdb_database_handle = DBI->connect("dbi:SQLite:dbname=filters.db.sqlite");
-       $database_handle->{unicode} = 1;
+       $filterdb_database_handle->{unicode} = 1;
        $filterdb_loaded = 1;
 
 }
@@ -2317,7 +2317,7 @@ sub connecttemplate{
        # Connect to the template database.
 
        $template_database_handle = DBI->connect("dbi:SQLite:dbname=templates.db.sqlite");
-       $database_handle->{unicode} = 1;
+       $template_database_handle->{unicode} = 1;
        $templatedb_loaded = 1;
 
 }