[Bast-commits] r3455 - branches/DBIx-Class-current/t

[blblack at dev.catalyst.perl.org]

Author: blblack
Date: 2007-06-01 00:44:14 +0100 (Fri, 01 Jun 2007)
New Revision: 3455

Modified:
   branches/DBIx-Class-current/t/76joins.t
Log:
fix test warning (double "my")

Modified: branches/DBIx-Class-current/t/76joins.t
===================================================================
--- branches/DBIx-Class-current/t/76joins.t	2007-05-31 23:18:23 UTC (rev 3454)
+++ branches/DBIx-Class-current/t/76joins.t	2007-05-31 23:44:14 UTC (rev 3455)
@@ -336,7 +336,7 @@
 
 is($rs->next->name, 'Caterwauler McCrae', "Correct artist returned");
 
-my $cd = $schema->resultset('Artist')->first->create_related('cds',
+$cd = $schema->resultset('Artist')->first->create_related('cds',
     {
     title   => 'Unproduced Single',
     year    => 2007