comparison Lib/IMPL/DOM/Schema/ComplexType.pm @ 102:cf3b6ef2be22

Schema beta version
author wizard
date Fri, 07 May 2010 08:05:23 +0400
parents 16ada169ca75
children c289ed9662ca
comparison
equal deleted inserted replaced
101:d8dc6cad3f55 102:cf3b6ef2be22
25 my ($this,%args) = @_; 25 my ($this,%args) = @_;
26 26
27 $this->{$nativeType} = $args{nativeType}; 27 $this->{$nativeType} = $args{nativeType};
28 } 28 }
29 29
30 sub qname {
31 $_[0]->nodeName.'[name='.$_[0]->type.']';
32 }
33
30 34
31 1; 35 1;