[svn:dbd-oracle] r14683 - dbd-oracle/trunk
[email protected] Sat, 5 Feb 2011 15:35:04 -0800 (PST)
| Newsgroups | perl.dbd.oracle.changes |
|---|---|
| Message-ID | <[email protected]> |
Author: byterock
Date: Sat Feb 5 15:35:02 2011
New Revision: 14683
Modified:
dbd-oracle/trunk/dbdimp.c
Log:
Fixed a typo that may cause problems on some compilers
Modified: dbd-oracle/trunk/dbdimp.c
==============================================================================
--- dbd-oracle/trunk/dbdimp.c (original)
+++ dbd-oracle/trunk/dbdimp.c Sat Feb 5 15:35:02 2011
@@ -445,10 +445,10 @@
croak("ora_driver_name is not a string");
imp_dbh->driver_name = (char *) SvPV (*svp, svp_len );
imp_dbh->driver_namel= (ub4) svp_len;
- OCIAttrSet_log_stat(,imp_dbh->seshp,OCI_HTYPE_SESSION, imp_dbh->driver_name,imp_dbh->driver_namel,OCI_ATTR_DRIVER_NAME,imp_dbh->errhp, status);
+ OCIAttrSet_log_stat(imp_dbh->seshp,OCI_HTYPE_SESSION, imp_dbh->driver_name,imp_dbh->driver_namel,OCI_ATTR_DRIVER_NAME,imp_dbh->errhp, status);
}
else {
- OCIAttrSet_log_stat(,imp_dbh->seshp,OCI_HTYPE_SESSION,(text*)"DBDO1.28",7,OCI_ATTR_DRIVER_NAME,imp_dbh->errhp, status);
+ OCIAttrSet_log_stat(imp_dbh->seshp,OCI_HTYPE_SESSION,(text*)"DBDO1.28",7,OCI_ATTR_DRIVER_NAME,imp_dbh->errhp, status);
}
#endif /*ORA_OCI_112*/
@@ -1240,7 +1240,7 @@
else if (kl==15 && strEQ(key, "ora_driver_name") ) {
imp_dbh->driver_name = (char *) SvPV (valuesv, vl );
imp_dbh->driver_namel= (ub4) vl;
- OCIAttrSet_log_stat(,imp_dbh->seshp,OCI_HTYPE_SESSION, imp_dbh->driver_name,imp_dbh->driver_namel,OCI_ATTR_DRIVER_NAME,imp_dbh->errhp, status);
+ OCIAttrSet_log_stat(imp_dbh->seshp,OCI_HTYPE_SESSION, imp_dbh->driver_name,imp_dbh->driver_namel,OCI_ATTR_DRIVER_NAME,imp_dbh->errhp, status);
}
else if (kl==8 && strEQ(key, "ora_drcp") ) {
imp_dbh->using_drcp = 1;
@@ -1352,7 +1352,7 @@
retsv = newSViv(imp_dbh->using_drcp);
}
else if (kl==14 && strEQ(key, "ora_drcp_class") ) {
- retsv = newSV(imp_dbh->pool_class);
+ retsv = newSVpv(imp_dbh->pool_class);
}
else if (kl==12 && strEQ(key, "ora_drcp_min") ) {
retsv = newSViv(imp_dbh->pool_min);