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

Author: yanick
Date: Fri Dec 30 13:13:06 2011
New Revision: 15053

Modified:
   dbd-oracle/trunk/Changes
   dbd-oracle/trunk/Oracle.pm

Log:
bring in changelog from v1.36

Modified: dbd-oracle/trunk/Changes
==============================================================================
--- dbd-oracle/trunk/Changes	(original)
+++ dbd-oracle/trunk/Changes	Fri Dec 30 13:13:06 2011
@@ -11,6 +11,7 @@
  - applied patch from Charles Jardine avoiding undefined values
    warnings in ora_server_version when the database is not open
    [RT72623] (Martin J. Evans)
+ - TNS_ADMIN was ignored [RT73456]
 
  [DOCUMENTATION]
 
@@ -19,6 +20,10 @@
    [RT72716] (Martin J. Evans)
  - Fix documentation for 'ora_fetch_scroll()'
 
+Changes in DBD-Oracle 1.36 (6-12-2011)
+    
+ - promote 1.35_00 to official release
+
 Changes in DBD-Oracle 1.35_00 (18-11-2011)
 
  [BUG FIXES]

Modified: dbd-oracle/trunk/Oracle.pm
==============================================================================
--- dbd-oracle/trunk/Oracle.pm	(original)
+++ dbd-oracle/trunk/Oracle.pm	Fri Dec 30 13:13:06 2011
@@ -155,8 +155,7 @@
 	push @tns_admin, '/var/opt/oracle', '/etc';
 
     TNS_ADMIN:
-	foreach $d ( @tns_admin  ) {
-        next TNS_ADMIN unless $d and -f $d;
+	foreach $d ( grep { $_ and -d $_ } @tns_admin  ) {
 	    open FH, '<', "$d/tnsnames.ora" or next TNS_ADMIN;
 
 	    $drh->trace_msg("Loading $d/tnsnames.ora\n") if $debug;