From: Michael G Schwern <mschwern@cpan.org>
Date: Fri, 31 Aug 2007 06:39:40 +0000 (-0700)
Subject: $schema isn't defined if the test is skipped.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=92d45f25a06e802790d8d1188f898b7b0dc4a118;p=dbsrgits%2FDBIx-Class-Historic.git

$schema isn't defined if the test is skipped.
---

diff --git a/t/73oracle_inflate.t b/t/73oracle_inflate.t
index 76085e6..41a04bb 100644
--- a/t/73oracle_inflate.t
+++ b/t/73oracle_inflate.t
@@ -55,7 +55,10 @@ is( $track->last_updated_on->month, $dt->month, "deflate ok");
 # clean up our mess
 END {
     # Set the metadata back for the last_updated_on column
-    $schema->class('Track')->add_column( 'last_updated_on' => $col_metadata );
+    if( $schema ) {
+        $schema->class('Track')
+               ->add_column( 'last_updated_on' => $col_metadata );
+    }
 
     if($dbh) {
         $dbh->do("DROP TABLE track");