[MOBY-guts] biomoby commit

Eddie Kawas kawas at dev.open-bio.org
Fri Jun 20 15:31:38 UTC 2008


kawas
Fri Jun 20 11:31:37 EDT 2008
Update of /home/repository/moby/moby-live/Perl/MOBY-Server/bin/scripts
In directory dev.open-bio.org:/tmp/cvs-serv22333/Perl/MOBY-Server/bin/scripts

Modified Files:
	moby-s-install.pl 
Log Message:
root/root was hard coded, changed it to use prompted values
moby-live/Perl/MOBY-Server/bin/scripts moby-s-install.pl,1.7,1.8
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY-Server/bin/scripts/moby-s-install.pl,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -r1.7 -r1.8
--- /home/repository/moby/moby-live/Perl/MOBY-Server/bin/scripts/moby-s-install.pl	2008/06/19 23:59:39	1.7
+++ /home/repository/moby/moby-live/Perl/MOBY-Server/bin/scripts/moby-s-install.pl	2008/06/20 15:31:37	1.8
@@ -966,7 +966,7 @@
 		) = $central->MOBY::Client::Central::DUMP();
 	    my $drh = DBI->install_driver("mysql");
 	    # used for creating the user/pass for the registry
-	    my $dbh = DBI->connect("DBI:mysql:mysql:localhost:3306", "root", "root", { RaiseError => 1, AutoCommit => 1 });
+	    my $dbh = DBI->connect("DBI:mysql:mysql:localhost:3306", "$username", "$password", { RaiseError => 1, AutoCommit => 1 });
 	    my ( $fh, $filename ) = tempfile( UNLINK => 1 );
 	    say "Processing dump for service instances ...";
 	    print $fh $mobycentral;




More information about the MOBY-guts mailing list