From c3f8d65a4fb1f5674557ee67cf7f74369df86ad1 Mon Sep 17 00:00:00 2001
From: Darkelarious <darkelarious@333networks.com>
Date: Sat, 19 Nov 2016 20:56:04 +0100
Subject: Massive improvements on efficiency, robustness, security, reliability
 and more

---
 lib/MasterServer/Database/mysql/dbCore.pm | 44 -------------------------------
 1 file changed, 44 deletions(-)
 delete mode 100755 lib/MasterServer/Database/mysql/dbCore.pm

(limited to 'lib/MasterServer/Database/mysql/dbCore.pm')

diff --git a/lib/MasterServer/Database/mysql/dbCore.pm b/lib/MasterServer/Database/mysql/dbCore.pm
deleted file mode 100755
index 30fe3ef..0000000
--- a/lib/MasterServer/Database/mysql/dbCore.pm
+++ /dev/null
@@ -1,44 +0,0 @@
-
-package MasterServer::Database::mysql::dbCore;
-
-use strict;
-use warnings;
-use Exporter 'import';
-
-our @EXPORT = qw| database_login |;
-
-################################################################################
-## login to the database with credentials provided in the config file.
-## returns dbh object or quits application on error.
-################################################################################
-sub database_login {
-  my $self = shift;
-
-  # create the dbi object
-  my $dbh = DBI->connect(@{$self->{dblogin}}, {PrintError => $self->{db_print}});
-  
-  # verify that the database connected
-  if (defined $dbh) {
-    
-    # log the event
-    $self->log("load","Connected to the MySQL database.");
-    
-    # turn on error printing
-    $dbh->{printerror} = 1;
-    
-    # return the dbi object for further use
-    return $dbh;
-  }
-  else {
-    # fatal error
-    $self->log("fatal", "$DBI::errstr!");
-    
-    # end program
-    $self->halt();
-  }
-  
-  # unreachable
-  return undef;
-}
-
-1;
-- 
cgit v1.2.3