[svn:dbd-oracle] r14404 - dbd-oracle/trunk

Author: byterock
Date: Wed Sep 15 07:07:48 2010
New Revision: 14404

Modified:
   dbd-oracle/trunk/Oracle.pm
   dbd-oracle/trunk/dbdimp.c
   dbd-oracle/trunk/oci8.c

Log:
A few more changes from the testers. Some changes to the POD, some warnings in the /c files

Modified: dbd-oracle/trunk/Oracle.pm
==============================================================================
--- dbd-oracle/trunk/Oracle.pm	(original)
+++ dbd-oracle/trunk/Oracle.pm	Wed Sep 15 07:07:48 2010
@@ -2212,6 +2212,16 @@
 Oracle returns it.
 See L</table_info()> for more detailed information.
 
+It is possiable with Oracle to make the names of the various DB objects (table,column,index etc)
+case sensitive. 
+
+  alter table bloggind add ("Bla_BLA" NUMBER)
+
+So in the example the exact case "Bla_BLA" must be used to get it info on the column. While this
+
+ alter table bloggind add (Bla_BLA NUMBER)
+
+any case can be used to get info on the column.
 
 =head1 Unicode
 

Modified: dbd-oracle/trunk/dbdimp.c
==============================================================================
--- dbd-oracle/trunk/dbdimp.c	(original)
+++ dbd-oracle/trunk/dbdimp.c	Wed Sep 15 07:07:48 2010
@@ -1151,6 +1151,7 @@
 		imp_dbh->using_drcp = 1;
 	}
 	else if (kl==14 && strEQ(key, "ora_drcp_class") ) {
+		STRLEN vl;
 		imp_dbh->pool_class = (text *) SvPV (valuesv, vl );
 		imp_dbh->pool_classl= (ub4) vl;
 	}
@@ -2440,8 +2441,10 @@
 		PerlIO_printf(DBILOGFP, "dbd_rebind_ph_char() (1): bind %s <== %.1000s (", phs->name, val);
 		if (!SvOK(phs->sv))
 			PerlIO_printf(DBILOGFP, "NULL, ");
-		PerlIO_printf(DBILOGFP, "size %ld/%ld/%d, ",(long)SvCUR(phs->sv),(long)SvLEN(phs->sv),phs->maxlen);
+		PerlIO_printf(DBILOGFP, "size %ld/%ld/%ld, ",(long)SvCUR(phs->sv),(long)SvLEN(phs->sv),(long)phs->maxlen);
 		PerlIO_printf(DBILOGFP, "ptype %d(%s), otype %d %s)\n",(int)SvTYPE(phs->sv), sql_typecode_name(phs->ftype),phs->ftype,(phs->is_inout) ? ", inout" : "");
+		
+		
 	}
 
 	/* At the moment we always do sv_setsv() and rebind.	*/

Modified: dbd-oracle/trunk/oci8.c
==============================================================================
--- dbd-oracle/trunk/oci8.c	(original)
+++ dbd-oracle/trunk/oci8.c	Wed Sep 15 07:07:48 2010
@@ -3787,8 +3787,7 @@
 							--datalen;
 					}
 					sv_setpvn(sv, p, (STRLEN)datalen);
-#if DBISTATE_VERSION > 94
-		/* DBIXS_REVISION > 13590 */
+#if DBIXS_REVISION > 13590
 		/* If a bind type was specified we use DBI's sql_type_cast
 			to cast it - currently only number types are handled */
 					if (fbh->req_type != 0) {