From: Chris W. <la...@us...> - 2004-09-27 13:25:08
|
Update of /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2291/lib/OpenInteract2 Modified Files: DatasourceManager.pm Log Message: OIN-81: remove warnings Index: DatasourceManager.pm =================================================================== RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/DatasourceManager.pm,v retrieving revision 1.14 retrieving revision 1.15 diff -C2 -d -r1.14 -r1.15 *** DatasourceManager.pm 18 Feb 2004 05:25:26 -0000 1.14 --- DatasourceManager.pm 27 Sep 2004 13:24:54 -0000 1.15 *************** *** 35,38 **** --- 35,41 ---- if ( $log->is_debug ) { my @call_info = caller(2); + unless ( $call_info[0] ) { + @call_info = caller(1); + } $log->debug( "Trying to find datasource '$ds_name' from ", join( ' - ', $call_info[0], $call_info[3], $call_info[2] ) ); *************** *** 290,292 **** =head1 AUTHORS ! Chris Winters E<lt>ch...@cw...E<gt> \ No newline at end of file --- 293,295 ---- =head1 AUTHORS ! Chris Winters E<lt>ch...@cw...E<gt> |