[Bast-commits] r3498 - branches/DBIx-Class-current/lib/DBIx/Class/Storage/DBI

[matthewt at dev.catalyst.perl.org]

Author: matthewt
Date: 2007-06-16 18:19:36 +0100 (Sat, 16 Jun 2007)
New Revision: 3498

Modified:
   branches/DBIx-Class-current/lib/DBIx/Class/Storage/DBI/Oracle.pm
Log:
fix conditional and document behaviour

Modified: branches/DBIx-Class-current/lib/DBIx/Class/Storage/DBI/Oracle.pm
===================================================================
--- branches/DBIx-Class-current/lib/DBIx/Class/Storage/DBI/Oracle.pm	2007-06-14 19:54:13 UTC (rev 3497)
+++ branches/DBIx-Class-current/lib/DBIx/Class/Storage/DBI/Oracle.pm	2007-06-16 17:19:36 UTC (rev 3498)
@@ -14,7 +14,7 @@
         my ($major, $minor, $patchlevel) = split(/\./, $version);
 
         # Default driver
-        my $class = $major >= 8
+        my $class = $major <= 8
           ? 'DBIx::Class::Storage::DBI::Oracle::WhereJoins'
           : 'DBIx::Class::Storage::DBI::Oracle::Generic';
 
@@ -40,9 +40,17 @@
 =head1 DESCRIPTION
 
 This class simply provides a mechanism for discovering and loading a sub-class
-for a specific version Oracle backend.  It should be transparent to the user.
+for a specific version Oracle backend. It should be transparent to the user.
 
+For Oracle major versions <= 8 it loads the ::Oracle::WhereJoins subclass,
+which unrolls the ANSI join style DBIC normally generates into entries in
+the WHERE clause for compatibility purposes. To force usage of this version
+no matter the database version, add
 
+  __PACKAGE__->storage_type('::DBI::Oracle::WhereJoins');
+
+to your Schema class.
+
 =head1 AUTHORS
 
 David Jack Olrik C<< <djo at cpan.org> >>