From: Peter Rabbitson Date: Sun, 11 Apr 2010 10:53:20 +0000 (+0000) Subject: Fix rogue tabs X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=174cac74a57ee4fdd56b8d726c7266c668880158;p=dbsrgits%2FDBIx-Class-Historic.git Fix rogue tabs --- diff --git a/t/93single_accessor_object.t b/t/93single_accessor_object.t index 892e656..41ac5da 100644 --- a/t/93single_accessor_object.t +++ b/t/93single_accessor_object.t @@ -45,20 +45,20 @@ plan tests => 10; $schema = DBICTest->init_schema(); { - my $artist = $schema->resultset('Artist')->create({ artistid => 666, name => 'bad religion' }); - my $cd = $schema->resultset('CD')->create({ cdid => 187, artist => 1, title => 'how could hell be any worse?', year => 1982, genreid => undef }); + my $artist = $schema->resultset('Artist')->create({ artistid => 666, name => 'bad religion' }); + my $cd = $schema->resultset('CD')->create({ cdid => 187, artist => 1, title => 'how could hell be any worse?', year => 1982, genreid => undef }); - ok(!defined($cd->get_column('genreid')), 'genreid is NULL'); #no accessor was defined for this column - ok(!defined($cd->genre), 'genre accessor returns undef'); + ok(!defined($cd->get_column('genreid')), 'genreid is NULL'); #no accessor was defined for this column + ok(!defined($cd->genre), 'genre accessor returns undef'); } $schema = DBICTest->init_schema(); { - my $artist = $schema->resultset('Artist')->create({ artistid => 666, name => 'bad religion' }); - my $genre = $schema->resultset('Genre')->create({ genreid => 88, name => 'disco' }); - my $cd = $schema->resultset('CD')->create({ cdid => 187, artist => 1, title => 'how could hell be any worse?', year => 1982 }); + my $artist = $schema->resultset('Artist')->create({ artistid => 666, name => 'bad religion' }); + my $genre = $schema->resultset('Genre')->create({ genreid => 88, name => 'disco' }); + my $cd = $schema->resultset('CD')->create({ cdid => 187, artist => 1, title => 'how could hell be any worse?', year => 1982 }); - dies_ok { $cd->genre } 'genre accessor throws without column'; + dies_ok { $cd->genre } 'genre accessor throws without column'; }