X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=lib%2FMachines%2FMySQL.pm;h=00f2b7c4eb95e498b3a19fe750dc5a791a701434;hb=bdb1e0c845a6921e22d52fbff3404d5c1dfae520;hp=398fd8f764936280e14edc1b54cc9498d018024f;hpb=ed7943b5913aae90452e00009a19aaa86605b820;p=clearscm.git

diff --git a/lib/Machines/MySQL.pm b/lib/Machines/MySQL.pm
index 398fd8f..00f2b7c 100755
--- a/lib/Machines/MySQL.pm
+++ b/lib/Machines/MySQL.pm
@@ -57,11 +57,12 @@ our $VERSION  = '$Revision: 1.0 $';
    ($VERSION) = ($VERSION =~ /\$Revision: (.*) /);
 
 my %MACHINEOPTS = (
-  SERVER   => 'localhost',
-  USERNAME => 'machines',
-  PASSWORD => 'w0rk$harder',
+  SERVER   => $ENV{REXEC_DBHOST} || 'localhost',
+  USERNAME => 'rexec',
+  PASSWORD => 'rexec',
 );
 
+# Internal methods
 sub _connect (;$) {
   my ($self, $dbserver) = @_;
 
@@ -105,7 +106,6 @@ sub _checkRequiredFields ($$) {
   return;
 } # _checkRequiredFields
 
-# Internal methods
 sub _dberror ($$) {
   my ($self, $msg, $statement) = @_;
 
@@ -239,4 +239,4 @@ sub AddSystem (%) {
   return $self->_addRecord ('system', %system);
 } # AddSystem
 
-1;
\ No newline at end of file
+1;