On Fri, Oct 08, 2004 at 09:42:18PM +0530, Mahadevan, Arun wrote:
> Hi,
>
> Recently we upgraded from DBD::Oracle v1.12 to DBD v1.15 as we had to
> upgrade to Oracle 9i.
>
> But there is some functionality difference I observerd in ora_open()
> function. (We are using Oraperl emulation of Perl DBI).
It's a bug in the Oraperl emulation. I changed it to not use the
"old style" DBI connect arguments but in doing so forgot that the
old-style implicitly disabled PrintError. Sorry about that.
I've appended the fix.
Tim.
--- Oraperl.pm (revision 442)
+++ Oraperl.pm (working copy)
@@ -94,7 +94,7 @@
local($SIG{'__WARN__'}) = sub { _warn($Oraperl::prev_warn, @_) };
# we now use the new style connect, since the old style is
# deprecated
- my $dbh = DBI->connect("dbi:Oracle:$system_id", $name, $password, { });
+ my $dbh = DBI->connect("dbi:Oracle:$system_id", $name, $password, { PrintError =>
0 });
return $dbh;
}
sub ora_logoff {
