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

Author: mjevans
Date: Thu May 12 02:40:19 2011
New Revision: 14851

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

Log:
Corrected examples of setting ora_xxx values


Modified: dbd-oracle/trunk/Changes
==============================================================================
--- dbd-oracle/trunk/Changes	(original)
+++ dbd-oracle/trunk/Changes	Thu May 12 02:40:19 2011
@@ -1,5 +1,6 @@
 =head1 Changes in DBD-Oracle 1.29_1 (svn rev NNNNN)
 
+  Added installation notes for MAC Snow Leopard by Martin J. Evans
   pod review rephrasing, fixing typos and spelling mistakes up to "Placeholder Binding Attributes" by Martin J. Evans
   Add /etc to the search paths for tnsnames.ora (rt67942) by Martin J. Evans, Jay Senseman
   Removed support for ProcC connections John Scoles

Modified: dbd-oracle/trunk/Oracle.pm
==============================================================================
--- dbd-oracle/trunk/Oracle.pm	(original)
+++ dbd-oracle/trunk/Oracle.pm	Thu May 12 02:40:19 2011
@@ -1834,7 +1834,7 @@
 
   my $dbh = DBI->connect($dsn, $user, $passwd, { ora_module_name => $0 });
 
-  $dbh{ora_module_name} = $y;
+  $dbh->{ora_module_name} = $y;
 
 =item ora_driver_name
 
@@ -1848,7 +1848,7 @@
 
   my $dbh = DBI->connect($dsn, $user, $passwd, { ora_driver_name => 'ModPerl_1' });
 
-  $dbh{ora_driver_name} = $q;
+  $dbh->{ora_driver_name} = $q;
 
 =item ora_client_info
 
@@ -1857,7 +1857,7 @@
 
   my $dbh = DBI->connect($dsn, $user, $passwd, { ora_client_info => 'Remote2' });
 
-  $dbh{ora_client_info} = "Remote2";
+  $dbh->{ora_client_info} = "Remote2";
 
 =item ora_client_identifier
 
@@ -1872,7 +1872,7 @@
 
   my $dbh = DBI->connect($dsn, $user, $passwd, { ora_client_identifier => $some_web_user });
 
-  $dbh{ora_client_identifier} = $local_user;
+  $dbh->{ora_client_identifier} = $local_user;
 
 =item ora_action
 
@@ -1881,7 +1881,7 @@
 
    my $dbh = DBI->connect($dsn, $user, $passwd, { ora_action => "Login"});
 
-   $dbh{ora_action} = "New Long Query 22";
+   $dbh->{ora_action} = "New Long Query 22";
 
 =item ora_dbh_share