[svn:dbd-oracle] r14921 - in dbd-oracle/branches/DBD-Oracle-1.30: . t

[email protected] Fri, 26 Aug 2011 12:01:06 -0700 (PDT)
Newsgroups perl.dbd.oracle.changes
Message-ID <[email protected]>
Author: yanick
Date: Fri Aug 26 12:01:05 2011
New Revision: 14921

Modified:
   dbd-oracle/branches/DBD-Oracle-1.30/Changes
   dbd-oracle/branches/DBD-Oracle-1.30/Oracle.pm
   dbd-oracle/branches/DBD-Oracle-1.30/t/31lob.t

Log:
import of git branch

Modified: dbd-oracle/branches/DBD-Oracle-1.30/Changes
==============================================================================
--- dbd-oracle/branches/DBD-Oracle-1.30/Changes	(original)
+++ dbd-oracle/branches/DBD-Oracle-1.30/Changes	Fri Aug 26 12:01:05 2011
@@ -1,5 +1,9 @@
 Revision history for DBD::Oracle
 
+Changes in DBD-Oracle 1.30
+  [DOCUMENTATION]
+ - add warning about RT##69350 in documentation 
+
 Changes in DBD-Oracle 1.29_1
  [ENHANCEMENTS]
  - added support for TAF callback (John Scoles)

Modified: dbd-oracle/branches/DBD-Oracle-1.30/Oracle.pm
==============================================================================
--- dbd-oracle/branches/DBD-Oracle-1.30/Oracle.pm	(original)
+++ dbd-oracle/branches/DBD-Oracle-1.30/Oracle.pm	Fri Aug 26 12:01:05 2011
@@ -7,7 +7,7 @@
 
 require 5.006;
 
-$DBD::Oracle::VERSION = '1.29_1';
+$DBD::Oracle::VERSION = '1.30';
 
 my $ORACLE_ENV  = ($^O eq 'VMS') ? 'ORA_ROOT' : 'ORACLE_HOME';
 
@@ -5584,6 +5584,12 @@
 Also PL/Vision from RevealNet and Steven Feuerstein, and
 "Q" from Savant Corporation.
 
+=head1 BUGS AND LIMITATIONS
+
+There is a known problem with the 11.2g Oracle client and the 
+C<DBMS_LOB.GETLENGTH()> PL/SQL function.  
+See L<https://rt.cpan.org/Public/Bug/Display.html?id=69350> for the details.
+
 
 =head1 SEE ALSO
 

Modified: dbd-oracle/branches/DBD-Oracle-1.30/t/31lob.t
==============================================================================
--- dbd-oracle/branches/DBD-Oracle-1.30/t/31lob.t	(original)
+++ dbd-oracle/branches/DBD-Oracle-1.30/t/31lob.t	Fri Aug 26 12:01:05 2011
@@ -2,12 +2,15 @@
 
 use strict;
 use Test::More;
-use DBD::Oracle qw(:ora_types);
+use DBD::Oracle qw(:ora_types ORA_OCI );
 use DBI;
 
 unshift @INC ,'t';
 require 'nchar_test_lib.pl';
 
+plan skip_all => "see RT#69350"
+    if ORA_OCI() =~ /^11\.2\./;
+
 my $dbh;
 $| = 1;
 SKIP: {