fix test failure in 05testapp.t when env var not set, release v0.33
Rafael Kitover [Sat, 26 Dec 2009 13:06:50 +0000 (13:06 +0000)]
Changes
lib/Catalyst/Helper/Model/DBIC/Schema.pm
lib/Catalyst/Model/DBIC/Schema.pm
t/05testapp.t

diff --git a/Changes b/Changes
index 8f425ca..f897788 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 Revision history for Perl extension Catalyst::Model::DBIC::Schema
 
+0.33  Sat Dec 26 08:04:49 EST 2009
+        - fix test failure in 05testapp.t when env var not set (RT#53101)
+
 0.32  Wed Dec 23 01:22:06 EST 2009
         - Move documentation on setting up authentication into its own section
           for clarity.
index 4951027..2858896 100644 (file)
@@ -4,7 +4,7 @@ use namespace::autoclean;
 use Moose;
 no warnings 'uninitialized';
 
-our $VERSION = '0.32';
+our $VERSION = '0.33';
 $VERSION = eval $VERSION;
 
 use Carp;
index 5ee32c9..2406196 100644 (file)
@@ -1,11 +1,12 @@
 package Catalyst::Model::DBIC::Schema;
 
+use 5.008_001;
 use Moose;
 use mro 'c3';
 extends 'Catalyst::Model';
 with 'CatalystX::Component::Traits';
 
-our $VERSION = '0.32';
+our $VERSION = '0.33';
 $VERSION = eval $VERSION;
 
 use namespace::autoclean;
@@ -695,6 +696,8 @@ osfameron: C<osfameron@cpan.org>
 
 ozum: Ozum Eldogan C<ozum@ozum.net>
 
+Pavel I. Shaydo C<zwon@trinitum.org>
+
 =head1 COPYRIGHT
 
 Copyright (c) 2006 - 2009
index 2b39662..c0fad1f 100644 (file)
@@ -83,6 +83,8 @@ sub rm_rf {
 }
 
 END {
-    chdir($test_dir);
-    finddepth(\&rm_rf, $cat_dir);
+    if ($ENV{C_M_DBIC_SCHEMA_TESTAPP}) {
+        chdir($test_dir);
+        finddepth(\&rm_rf, $cat_dir);
+    }
 }