Yuki Kimoto test cleanup
f3bb824 13 years ago
1 contributor
11 lines | 0.144kb
  1. package MyModel6::TABLE3;
  2.  
  3. use base 'MyModel6';
  4.  
  5. __PACKAGE__->attr(filter => sub {
  6. [
  7. KEY1 => {in => sub { uc $_[0] }}
  8. ]
  9. });
  10.  
  11. 1;