summaryrefslogtreecommitdiff
path: root/Master/Tools/XML/DOM/NodeList.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/Tools/XML/DOM/NodeList.pm')
-rw-r--r--Master/Tools/XML/DOM/NodeList.pm46
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