[svn:dbd-oracle] r15180 - dbd-oracle/branches/FAN
[email protected] Sat, 25 Feb 2012 07:28:54 -0800 (PST)
| Newsgroups | perl.dbd.oracle.changes |
|---|---|
| Message-ID | <[email protected]> |
Author: byterock
Date: Sat Feb 25 07:28:53 2012
New Revision: 15180
Modified:
dbd-oracle/branches/FAN/dbdimp.c
Log:
little more changes
Modified: dbd-oracle/branches/FAN/dbdimp.c
==============================================================================
--- dbd-oracle/branches/FAN/dbdimp.c (original)
+++ dbd-oracle/branches/FAN/dbdimp.c Sat Feb 25 07:28:53 2012
@@ -400,7 +400,6 @@
SV * shared_dbh_priv_sv ;
STRLEN shared_dbh_len = 0 ;
-PerlIO_printf(DBILOGFP,"Use threads.\n");
#endif
@@ -649,8 +648,6 @@
OCIEnvNlsCreate_log_stat( &imp_dbh->envhp,init_mode, (dvoid *) 0,(dvoid * (*)(dvoid *,size_t)) 0, (dvoid * (*)(dvoid *, dvoid *, size_t)) 0, (void (*)(dvoid *, dvoid *)) 0, (size_t)0, (dvoid **)0,
charsetid, ncharsetid, status );
- PerlIO_printf(DBILOGFP, " well I am here 1\n");
-
if (status != OCI_SUCCESS) {
oci_error(dbh, NULL, status,
"OCIEnvNlsCreate. Check ORACLE_HOME (Linux) env var or PATH (Windows) and or NLS settings, permissions, etc.");
@@ -689,7 +686,6 @@
if (new_charsetid) charsetid = new_charsetid;
if (new_ncharsetid) ncharsetid = new_ncharsetid;
imp_dbh->envhp = NULL;
-PerlIO_printf(DBILOGFP, " well I am here 2\n");
OCIEnvNlsCreate_log_stat( &imp_dbh->envhp, OCI_EVENTS, 0, NULL, NULL, NULL, 0, 0,
charsetid, ncharsetid, status );
if (status != OCI_SUCCESS) {