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';
=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