Still more fiddling with the loading stuff.

diff --git a/cgi-files/Modules/Database/MySQL5.pm b/cgi-files/Modules/Database/MySQL5.pm
index 18fe539..d2c9c17 100644 (file)
--- 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 (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.
 

diff --git a/cgi-files/kiriwrite.cgi b/cgi-files/kiriwrite.cgi
index bb13b10..4f0fc6d 100755 (executable)
--- 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.