Skip Menu |
 

Preferred bug tracker

Please visit the preferred bug tracker to report your issue.

This queue is for tickets about the DBD-Oracle CPAN distribution.

Report information
The Basics
Id: 23783
Status: resolved
Priority: 0/
Queue: DBD-Oracle

People
Owner: champoux [...] pythian.com
Requestors: rkitover [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 1.19
Fixed in: (no value)



Download (untitled) / with headers
text/plain 872b
Fails t/31lob.t when v$session is not available to scott/tiger or $ENV{ORACLE_USERID}. Patch below just skips the one test that relies on it if v$session is not available. --- 31lob.t.orig 2006-12-04 18:42:10.000000000 -0800 +++ 31lob.t 2006-12-04 18:52:35.000000000 -0800 @@ -59,6 +59,13 @@ return $count; } +sub have_v_session { + my $dbh = shift; + $dbh->do('select * from v$session where 0=1'); + return if $dbh->err == 942; + return 1; +} + ## test writing / reading large data { # LOB locators cannot span transactions - turn off AutoCommit @@ -163,6 +170,7 @@ undef $sth; # lobs are freed with statement handle + skip q{can't check num of temp lobs, no access to v$session}, 1, unless have_v_session($dbh); is(temp_lob_count($dbh), 0, "no temp lobs left"); } } -- Rafael
Download (untitled) / with headers
text/plain 200b
Thanks for the Patch that was something I was working on as well. I have tested it and will add it to the trunk version of DBD::Oracle and in will be in the next relsease. Cheers and thanks again.


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.