diff options
Diffstat (limited to 'Master/Tools/XML/DOM/NodeList.pm')
-rw-r--r-- | Master/Tools/XML/DOM/NodeList.pm | 46 |
1 files changed, 0 insertions, 46 deletions
diff --git a/Master/Tools/XML/DOM/NodeList.pm b/Master/Tools/XML/DOM/NodeList.pm deleted file mode 100644 index 81aad84881c..00000000000 --- a/Master/Tools/XML/DOM/NodeList.pm +++ /dev/null @@ -1,46 +0,0 @@ -###################################################################### -package XML::DOM::NodeList; -###################################################################### - -use vars qw ( $EMPTY ); - -# Empty NodeList -$EMPTY = new XML::DOM::NodeList; - -sub new -{ - bless [], $_[0]; -} - -sub item -{ - $_[0]->[$_[1]]; -} - -sub getLength -{ - int (@{$_[0]}); -} - -#------------------------------------------------------------ -# Extra method implementations - -sub dispose -{ - my $self = shift; - for my $kid (@{$self}) - { - $kid->dispose; - } -} - -sub setOwnerDocument -{ - my ($self, $doc) = @_; - for my $kid (@{$self}) - { - $kid->setOwnerDocument ($doc); - } -} - -1; # package return code |