|
From: <rv...@us...> - 2009-09-26 04:42:01
|
Revision: 187
http://treebase.svn.sourceforge.net/treebase/?rev=187&view=rev
Author: rvos
Date: 2009-09-26 04:41:53 +0000 (Sat, 26 Sep 2009)
Log Message:
-----------
Debugging perly login methods
Modified Paths:
--------------
trunk/treebase-core/src/main/perl/lib/CIPRES/TreeBase/DBIUtil.pm
Modified: trunk/treebase-core/src/main/perl/lib/CIPRES/TreeBase/DBIUtil.pm
===================================================================
--- trunk/treebase-core/src/main/perl/lib/CIPRES/TreeBase/DBIUtil.pm 2009-09-26 04:04:53 UTC (rev 186)
+++ trunk/treebase-core/src/main/perl/lib/CIPRES/TreeBase/DBIUtil.pm 2009-09-26 04:41:53 UTC (rev 187)
@@ -16,7 +16,6 @@
my $user = $opts{user} || $login_info_class->user;
my $pass = $opts{pass} || $login_info_class->pass;
my $dsn = $opts{dsn} ? sprintf $opts{dsn}, $user, $pass : $login_info_class->dsn($user, $pass);
-
my $h = DBI->connect($dsn);
$h->{private_cipres_treebase_dbiutil_username} = $user if $h;
return $h;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|