Mercurial > pub > Impl
comparison Lib/IMPL/DOM/Schema/SimpleType.pm @ 152:1e7f03414b65
DOM: schema improvements
DOM: saving to XML::Writer feature
author | wizard |
---|---|
date | Thu, 23 Sep 2010 03:58:43 +0400 |
parents | e30bdd040fe3 |
children | 76515373dac0 |
comparison
equal
deleted
inserted
replaced
151:e36ffd8c29db | 152:1e7f03414b65 |
---|---|
3 use warnings; | 3 use warnings; |
4 | 4 |
5 use base qw(IMPL::DOM::Schema::SimpleNode); | 5 use base qw(IMPL::DOM::Schema::SimpleNode); |
6 use IMPL::Class::Property; | 6 use IMPL::Class::Property; |
7 use IMPL::Class::Property::Direct; | 7 use IMPL::Class::Property::Direct; |
8 use IMPL::DOM::Property qw(_dom); | |
8 | 9 |
9 BEGIN { | 10 BEGIN { |
10 public _direct property nativeType => prop_get; | 11 public _dom _direct property nativeType => prop_get; |
11 public _direct property messageWrongType => prop_get; | 12 public _dom _direct property messageWrongType => prop_get; |
12 } | 13 } |
13 | 14 |
14 our %CTOR = ( | 15 our %CTOR = ( |
15 'IMPL::DOM::Schema::SimpleNode' => sub { | 16 'IMPL::DOM::Schema::SimpleNode' => sub { |
16 my %args = @_; | 17 my %args = @_; |