diff --git a/SetupNewComp.pl b/SetupNewComp.pl
index ecf364c..9582943 100755
--- a/SetupNewComp.pl
+++ b/SetupNewComp.pl
@@ -185,7 +185,7 @@ sub setCompanyDBGrant() {
     return 1;
 }
 
-sub checkCompanyDBTables() {
+sub setCompanyDBTables() {
     my $dbh =
       DBI->connect( "DBI:mysql:$db_adm;host=$db_adm_srv", 'root', $db_root_pwd )
       or die getTimeStamp("log")