Mercurial > pub > Impl
comparison Lib/Form/Filter/Mandatory.pm @ 165:76515373dac0
Added Class::Template,
Rewritten SQL::Schema
'use parent' directive instead of 'use base'
author | wizard |
---|---|
date | Sat, 23 Apr 2011 23:06:48 +0400 |
parents | 16ada169ca75 |
children |
comparison
equal
deleted
inserted
replaced
164:eb3e9861a761 | 165:76515373dac0 |
---|---|
1 package Form::Filter::Mandatory; | 1 package Form::Filter::Mandatory; |
2 use strict; | 2 use strict; |
3 use Common; | 3 use Common; |
4 use base qw(Form::Filter); | 4 use parent qw(Form::Filter); |
5 | 5 |
6 sub SUPPORTED_CONTEXT { Form::Filter::CTX_SINGLE | Form::Filter::CTX_SET } | 6 sub SUPPORTED_CONTEXT { Form::Filter::CTX_SINGLE | Form::Filter::CTX_SET } |
7 | 7 |
8 sub Invoke { | 8 sub Invoke { |
9 my ($this,$target,$context,$schemaTarget,$parent) = @_; | 9 my ($this,$target,$context,$schemaTarget,$parent) = @_; |