Mercurial > pub > Impl
comparison Lib/IMPL/DOM/Schema/SimpleType.pm @ 124:e30bdd040fe3
IMPL::Web::TT::Form concept
author | wizard |
---|---|
date | Thu, 10 Jun 2010 02:45:59 +0400 |
parents | a6e9759ff88a |
children | 1e7f03414b65 |
comparison
equal
deleted
inserted
replaced
123:1d7e370a91fa | 124:e30bdd040fe3 |
---|---|
16 my %args = @_; | 16 my %args = @_; |
17 $args{nodeName} = 'SimpleType'; | 17 $args{nodeName} = 'SimpleType'; |
18 $args{minOccur} = 0; | 18 $args{minOccur} = 0; |
19 $args{maxOccur} = 'unbounded'; | 19 $args{maxOccur} = 'unbounded'; |
20 $args{name} ||= 'SimpleType'; | 20 $args{name} ||= 'SimpleType'; |
21 delete @args{qw(nativeType messageWrongType)}; | |
21 %args | 22 %args |
22 } | 23 } |
23 ); | 24 ); |
24 | 25 |
25 sub CTOR { | 26 sub CTOR { |