[Jifty-commit] r3480 - Jifty-DBI/trunk/lib/Jifty/DBI/Handle

[jifty-commit at lists.jifty.org]

Author: ruz
Date: Thu Jun 14 04:05:00 2007
New Revision: 3480

Modified:
   Jifty-DBI/trunk/lib/Jifty/DBI/Handle/Oracle.pm

Log:
* instead of failing return at least something from database_version for Oracle

Modified: Jifty-DBI/trunk/lib/Jifty/DBI/Handle/Oracle.pm
==============================================================================
--- Jifty-DBI/trunk/lib/Jifty/DBI/Handle/Oracle.pm	(original)
+++ Jifty-DBI/trunk/lib/Jifty/DBI/Handle/Oracle.pm	Thu Jun 14 04:05:00 2007
@@ -1,6 +1,6 @@
 package Jifty::DBI::Handle::Oracle;
 use base qw/Jifty::DBI::Handle/;
-use DBD::Oracle qw(:ora_types);
+use DBD::Oracle qw(:ora_types ORA_OCI);
 
 use vars qw($VERSION $DBIHandle $DEBUG);
 
@@ -47,6 +47,17 @@
     return ($DBIHandle);
 }
 
+=head2 database_version
+
+Returns value of ORA_OCI constant, see L<DBD::Oracle/Constants>.
+
+=cut
+
+sub database_version {
+    return ''. ORA_OCI;
+}
+
+
 =head2 insert
 
 Takes a table name as the first argument and assumes that the rest of