Mercurial > pub > Impl

comparison Lib/IMPL/DOM/Schema/AnyNode.pm @ 165:76515373dac0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 16ada169ca75
children d1676be8afcc
comparison
equal deleted inserted replaced
164:eb3e9861a761 165:76515373dac0
1 package IMPL::DOM::Schema::AnyNode; 1 package IMPL::DOM::Schema::AnyNode;
2 use strict; 2 use strict;
3 use warnings; 3 use warnings;
4 4
5 use base qw(IMPL::DOM::Schema::Node); 5 use parent qw(IMPL::DOM::Schema::Node);
6 6
7 our %CTOR = ( 7 our %CTOR = (
8 'IMPL::DOM::Schema::Node' => sub { 8 'IMPL::DOM::Schema::Node' => sub {
9 my %args = @_; 9 my %args = @_;
10 $args{nodeName} ||= 'AnyNode'; 10 $args{nodeName} ||= 'AnyNode';