view Lib/DOM.pm @ 122:a7efb3117295

Fixed bug in IMPL::DOM::Navigator::selectNodes Fixed bug in IMPL::DOM::Node::selectNodes renamed operator 'type' to 'typeof' in IMPL::Object::Abstract A proper implementation of the IMPL::DOM::Node::nodeProperty and a related changes in the IMPL::DOM::Property module, now the last is very simple.
author wizard
date Tue, 08 Jun 2010 20:12:45 +0400
parents 16ada169ca75
children
line wrap: on
line source

package DOM;
require DOM::Site;
use Common;

my $GlobalSite;

sub Site {
    my $self = shift;
    
    $GlobalSite = construct DOM::Site if not $GlobalSite;
    return $GlobalSite;
}

sub Cleanup {
    $GlobalSite->Dispose if $GlobalSite;
    undef $GlobalSite;
}

1;