Mercurial > pub > Impl

diff Lib/IMPL/DOM/Schema/SwitchNode.pm @ 152:1e7f03414b65

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
DOM: schema improvements DOM: saving to XML::Writer feature
author wizard
date Thu, 23 Sep 2010 03:58:43 +0400
parents a4b0a819bbda
children 76515373dac0
line wrap: on
line diff
--- a/Lib/IMPL/DOM/Schema/SwitchNode.pm	Fri Aug 20 16:33:37 2010 +0400
+++ b/Lib/IMPL/DOM/Schema/SwitchNode.pm	Thu Sep 23 03:58:43 2010 +0400
@@ -5,6 +5,7 @@
 use base qw(IMPL::DOM::Schema::AnyNode);
 use IMPL::Class::Property;
 require IMPL::DOM::Schema::ValidationError;
+use IMPL::DOM::Property qw(_dom);
 
 our %CTOR = (
     'IMPL::DOM::Schema::AnyNode' => sub {
@@ -17,7 +18,7 @@
 );
 
 BEGIN {
-    public property messageNoMatch => prop_all;
+    public _dom property messageNoMatch => prop_all;
 }
 
 sub CTOR {