Update of /cvsroot/monetdb/clients/src/perl/DBD
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv14987/src/perl/DBD
Modified Files:
monetdb.pm
Log Message:
propagated changes of Wednesday Oct 17 2007 - Monday Oct 22 2007
from the Clients_1-20 branch to the development trunk
Index: monetdb.pm
===================================================================
RCS file: /cvsroot/monetdb/clients/src/perl/DBD/monetdb.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- monetdb.pm 3 Jan 2007 12:18:06 -0000 1.2
+++ monetdb.pm 22 Oct 2007 10:35:42 -0000 1.3
@@ -56,8 +56,9 @@
my $port = $dsn{port} || 50000;
$user ||= 'monetdb';
$password ||= 'monetdb';
+ my $db = $dsn{database} || 'demo';
- my $cxn = eval { MonetDB::CLI->connect($host, $port, $user, $password,
$lang) };
+ my $cxn = eval { MonetDB::CLI->connect($host, $port, $user, $password,
$lang, $db) };
return $drh->set_err(-1, $@) if $@;
my ($outer, $dbh) = DBI::_new_dbh($drh, { Name => $dsn });
-------------------------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc.
Still grepping through log files to find problems? Stop.
Now Search log events and configuration files using AJAX and a browser.
Download your FREE copy of Splunk now >> http://get.splunk.com/
_______________________________________________
Monetdb-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-checkins
