Mercurial > pub > Impl
comparison Lib/IMPL/DOM/Schema/Validator/RegExp.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 | e6447ad85cb4 |
children | d1676be8afcc |
comparison
equal
deleted
inserted
replaced
164:eb3e9861a761 | 165:76515373dac0 |
---|---|
1 package IMPL::DOM::Schema::Validator::RegExp; | 1 package IMPL::DOM::Schema::Validator::RegExp; |
2 | 2 |
3 use base qw(IMPL::DOM::Schema::Validator); | 3 use parent qw(IMPL::DOM::Schema::Validator); |
4 | 4 |
5 our %CTOR = ( | 5 our %CTOR = ( |
6 'IMPL::DOM::Schema::Validator' => sub { | 6 'IMPL::DOM::Schema::Validator' => sub { |
7 my %args = @_; | 7 my %args = @_; |
8 $args{nodeName} ||= 'RegExp'; | 8 $args{nodeName} ||= 'RegExp'; |