From 0079f1504cf54bcd3955157235922a75318581f3 Mon Sep 17 00:00:00 2001
From: kirinji <kirinji@b7d4c41f-bb2b-0410-be1d-d0fb2b8774c1>
Date: Mon, 6 Aug 2007 01:12:11 +0000
Subject: [PATCH] Still more fiddling with the loading stuff.
---
cgi-files/Modules/Database/MySQL5.pm | 2 +-
cgi-files/Modules/Database/SQLite.pm | 2 +-
cgi-files/kiriwrite.cgi | 4 ++--
3 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/cgi-files/Modules/Database/MySQL5.pm b/cgi-files/Modules/Database/MySQL5.pm
index 18fe539..d2c9c17 100644
--- a/cgi-files/Modules/Database/MySQL5.pm
+++ b/cgi-files/Modules/Database/MySQL5.pm
@@ -31,7 +31,7 @@ use Encode qw();
# Load the following Perl modules.
-use DBI;
+use DBI qw(:sql_types);
# Set the following values.
diff --git a/cgi-files/Modules/Database/SQLite.pm b/cgi-files/Modules/Database/SQLite.pm
index 92bce19..1fa3a9a 100644
--- 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.
diff --git a/cgi-files/kiriwrite.cgi b/cgi-files/kiriwrite.cgi
index bb13b10..4f0fc6d 100755
--- a/cgi-files/kiriwrite.cgi
+++ b/cgi-files/kiriwrite.cgi
@@ -24,10 +24,10 @@
use strict; # Throw errors if there's something wrong.
use warnings; # Write warnings to the HTTP Server Log file.
-use utf8 qw();
+use utf8;
use CGI qw(header);
use CGI::Carp('fatalsToBrowser'); # Output errors to the browser.
-use Tie::IxHash qw();
+use Tie::IxHash;
# Declare global variables for Kiriwrite settings and languages.
--
2.39.5