Yuki Kimoto test cleranup
5e1d777 13 years ago
1 contributor
10 lines | 0.178kb
  1. package MyModel8::table2;
  2. use MyModel8 -base;
  3.  
  4. has filter => sub {
  5. {
  6. key3 => {out => sub { $_[0] * 2}, in => sub { $_[0] * 3}, end => sub { $_[0] * 4 }}
  7. }
  8. };
  9.  
  10. 1;