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>
|