[Bast-commits] r8441 - DBIx-Class-Journal/1.000/trunk/t

[frew at dev.catalyst.perl.org]

Author: frew
Date: 2010-01-27 07:08:58 +0000 (Wed, 27 Jan 2010)
New Revision: 8441

Modified:
   DBIx-Class-Journal/1.000/trunk/t/01test.t
   DBIx-Class-Journal/1.000/trunk/t/02noautodeploy.t
Log:
Data::Dumper is not used here at all

Modified: DBIx-Class-Journal/1.000/trunk/t/01test.t
===================================================================
--- DBIx-Class-Journal/1.000/trunk/t/01test.t	2010-01-27 07:08:03 UTC (rev 8440)
+++ DBIx-Class-Journal/1.000/trunk/t/01test.t	2010-01-27 07:08:58 UTC (rev 8441)
@@ -1,10 +1,9 @@
 use strict;
-use warnings;  
+use warnings;
 
 use Test::More;
 use lib qw(t/lib);
 use DBICTest;
-use Data::Dumper;
 
 BEGIN {
     eval "use DBD::SQLite; use SQL::Translator";

Modified: DBIx-Class-Journal/1.000/trunk/t/02noautodeploy.t
===================================================================
--- DBIx-Class-Journal/1.000/trunk/t/02noautodeploy.t	2010-01-27 07:08:03 UTC (rev 8440)
+++ DBIx-Class-Journal/1.000/trunk/t/02noautodeploy.t	2010-01-27 07:08:58 UTC (rev 8441)
@@ -1,10 +1,9 @@
 use strict;
-use warnings;  
+use warnings;
 
 use Test::More;
 use lib qw(t/lib);
 use DBICTest;
-use Data::Dumper;
 
 BEGIN {
     eval "use DBD::SQLite; use SQL::Translator";
@@ -20,7 +19,7 @@
 isa_ok($schema->_journal_schema->source('CDAuditHistory'), 'DBIx::Class::ResultSource', 'CDAuditHistory source exists');
 isa_ok($schema->_journal_schema->source('ArtistAuditLog'), 'DBIx::Class::ResultSource', 'ArtistAuditLog source exists');
 
-my $count = eval { 
+my $count = eval {
     $schema->_journal_schema->resultset('ChangeLog')->count;
 };
 my $e = $@;