/[suikacvs]/messaging/manakai/lib/Message/DOM/AttributeDefinition.pm
Suika

Diff of /messaging/manakai/lib/Message/DOM/AttributeDefinition.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5 by wakaba, Sun Jun 17 14:15:38 2007 UTC revision 1.6 by wakaba, Sat Jun 23 12:47:12 2007 UTC
# Line 8  sub ____new ($$$) { Line 8  sub ____new ($$$) {
8    my $self = shift->SUPER::____new (shift);    my $self = shift->SUPER::____new (shift);
9    $$self->{node_name} = $_[0];    $$self->{node_name} = $_[0];
10    $$self->{child_nodes} = [];    $$self->{child_nodes} = [];
11    $$self->{allowed_token} = [];    $$self->{allowed_tokens} = [];
12    return $self;    return $self;
13  } # ____new  } # ____new
14                            
# Line 94  sub node_type ($) { 81002 } # ATTRIBUTE_ Line 94  sub node_type ($) { 81002 } # ATTRIBUTE_
94    
95  ## |AttributeDefinition| attributes  ## |AttributeDefinition| attributes
96    
97  sub allowed_token ($) {  sub allowed_tokens ($) {
98    ## TODO:    ## TODO:
99    return ${$_[0]}->{allowed_token};    return ${$_[0]}->{allowed_tokens};
100  }  }
101    
102  sub declared_type ($;$) {  sub declared_type ($;$) {
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24