From: Norbert Buchmuller <norbi@nix.hu>
Date: Wed, 18 Feb 2009 03:55:54 +0000 (+0100)
Subject:  * Added the missing POD of a sub.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=20f27051a82ba12bd23bf2e37be560e1b0f1742b;p=dbsrgits%2FDBIx-Class-Historic.git

 * Added the missing POD of a sub.
---

diff --git a/lib/DBIx/Class/Storage/DBI/Oracle/Generic.pm b/lib/DBIx/Class/Storage/DBI/Oracle/Generic.pm
index d12e3ff..4066c67 100644
--- a/lib/DBIx/Class/Storage/DBI/Oracle/Generic.pm
+++ b/lib/DBIx/Class/Storage/DBI/Oracle/Generic.pm
@@ -84,6 +84,13 @@ sub _sequence_fetch {
   return $id;
 }
 
+=head2 connected
+
+Returns true if we have an open (and working) database connection, false if it is not (yet)
+open (or does not work). (Executes a simple SELECT to make sure it works.)
+
+=cut
+
 sub connected {
   my $self = shift;