Mercurial > pub > Impl
comparison Lib/IMPL/DOM/Schema/Node.pm @ 152:1e7f03414b65
DOM: schema improvements
DOM: saving to XML::Writer feature
author | wizard |
---|---|
date | Thu, 23 Sep 2010 03:58:43 +0400 |
parents | e6447ad85cb4 |
children | 76515373dac0 |
comparison
equal
deleted
inserted
replaced
151:e36ffd8c29db | 152:1e7f03414b65 |
---|---|
6 use IMPL::Class::Property; | 6 use IMPL::Class::Property; |
7 use IMPL::DOM::Property qw(_dom); | 7 use IMPL::DOM::Property qw(_dom); |
8 use IMPL::Class::Property::Direct; | 8 use IMPL::Class::Property::Direct; |
9 | 9 |
10 BEGIN { | 10 BEGIN { |
11 public _direct property minOccur => prop_all; | 11 public _dom _direct property minOccur => prop_all; |
12 public _direct property maxOccur => prop_all; | 12 public _dom _direct property maxOccur => prop_all; |
13 public _direct property type => prop_all; | 13 public _dom _direct property type => prop_all; |
14 public _direct property name => prop_all; | 14 public _dom _direct property name => prop_all; |
15 public _direct property display => prop_all; | 15 public _dom _direct property display => prop_all; |
16 public _direct property display_no => prop_all; | 16 public _dom _direct property display_no => prop_all; |
17 public _direct property display_blame => prop_all; | 17 public _dom _direct property display_blame => prop_all; |
18 } | 18 } |
19 | 19 |
20 our %CTOR = ( | 20 our %CTOR = ( |
21 'IMPL::DOM::Node' => sub { | 21 'IMPL::DOM::Node' => sub { |
22 my %args = @_; | 22 my %args = @_; |