Update of /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Manage/Website
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24446
Modified Files:
TestDB.pm
Log Message:
oi2_manage test_db did not work because sanity check always returned "No DBI datasources" although there is
Index: TestDB.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Manage/Website/TestDB.pm,v
retrieving revision 1.13
retrieving revision 1.14
diff -C2 -d -r1.13 -r1.14
*** TestDB.pm 17 Mar 2005 14:58:04 -0000 1.13
--- TestDB.pm 20 Mar 2005 16:03:35 -0000 1.14
***************
*** 29,34 ****
# Perform initial sanity checks
! unless ( ref $datasource_config ne 'HASH' and
! scalar keys %{ $datasource_config } ) {
$self->_ok( $action,
'No DBI datasources; no connection attempted.' );
--- 29,34 ----
# Perform initial sanity checks
! if ( ref( $datasource_config ) ne 'HASH' ||
! !scalar keys %{ $datasource_config } ) {
$self->_ok( $action,
'No DBI datasources; no connection attempted.' );
|
