__PACKAGE__->column_info_from_storage(1);
__PACKAGE__->set_primary_key('id');
-sub store_column {
+ sub store_column {
my ($self, $name, $value) = @_;
$value = '#'.$value if($name eq "storecolumn");
$self->maybe::next::method($name, $value);
-}
-
+ }
}
{
my $count;
lives_ok {
$count = $schema->resultset('ArrayTest')->search({
- arrayfield => \[ '= ?' => [arrayfield => [3, 4]] ], #TODO anything less ugly than this?
+ arrayfield => \[ '= ?' => [arrayfield => [3, 4]] ], #Todo anything less ugly than this?
})->count;
} 'comparing arrayref to pg array data does not blow up';
is($count, 1, 'comparing arrayref to pg array data gives correct result');
$dbh->do("DROP SCHEMA testschema;");
}
}
-