Mercurial > pub > Impl
view Lib/DOM.pm @ 38:d660fb38b7cc
small fixes
ORM shema to SQL schema transformation
author | Sergey |
---|---|
date | Mon, 23 Nov 2009 17:57:07 +0300 |
parents | 03e58a454b20 |
children | 16ada169ca75 |
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;