[svn:dbd-oracle] r13748 - in dbd-oracle/branches/DBDOracle8: . t

Author: byterock
Date: Tue Jan 19 11:22:50 2010
New Revision: 13748

Modified:
   dbd-oracle/branches/DBDOracle8/Makefile.PL
   dbd-oracle/branches/DBDOracle8/Oracle8.pm
   dbd-oracle/branches/DBDOracle8/t/31lob.t

Log:
another little change

Modified: dbd-oracle/branches/DBDOracle8/Makefile.PL
==============================================================================
--- dbd-oracle/branches/DBDOracle8/Makefile.PL	(original)
+++ dbd-oracle/branches/DBDOracle8/Makefile.PL	Tue Jan 19 11:22:50 2010
@@ -121,7 +121,7 @@
 
 # --- Where is Oracle installed...
 
-my $ORACLE_ENV  = ($os eq 'VMS') ? 'ORA_ROOT' : 'ORACLE_HOME';
+my $ORACLE_ENV  = ($os eq 'VMS') ? 'ORA8_ROOT' : 'ORACLE_HOME8';
 my $OH = $ENV{$ORACLE_ENV} || '';
 $OH  = win32_oracle_home($OH) if ($os eq 'MSWin32') or ($os =~ /cygwin/i);
 $OH = unixify $OH if $os eq 'VMS';

Modified: dbd-oracle/branches/DBDOracle8/Oracle8.pm
==============================================================================
--- dbd-oracle/branches/DBDOracle8/Oracle8.pm	(original)
+++ dbd-oracle/branches/DBDOracle8/Oracle8.pm	Tue Jan 19 11:22:50 2010
@@ -8,7 +8,7 @@
 
 $DBD::Oracle8::VERSION = '1.00';
 
-my $ORACLE_ENV  = ($^O eq 'VMS') ? 'ORA_ROOT' : 'ORACLE_HOME';
+my $ORACLE_ENV  = ($^O eq 'VMS') ? 'ORA_ROOT8' : 'ORACLE_HOME8';
 
 {
     package DBD::Oracle8;

Modified: dbd-oracle/branches/DBDOracle8/t/31lob.t
==============================================================================
--- dbd-oracle/branches/DBDOracle8/t/31lob.t	(original)
+++ dbd-oracle/branches/DBDOracle8/t/31lob.t	Tue Jan 19 11:22:50 2010
@@ -2,7 +2,7 @@
 
 use strict;
 use Test::More tests => 2;
-use DBD::Oracle qw(:ora_types);
+use DBD::Oracle8 qw(:ora_types);
 use DBI;
 
 unshift @INC ,'t';