Mercurial > pub > Impl
diff Lib/IMPL/Web/View/TTDocument.pm @ 307:2da2564f115d
*TTView: fixed memory leak
author | cin |
---|---|
date | Thu, 18 Apr 2013 02:21:28 +0400 |
parents | b5d5793f348e |
children | 47a09a8dc23a |
line wrap: on
line diff
--- a/Lib/IMPL/Web/View/TTDocument.pm Wed Apr 17 19:33:07 2013 +0400 +++ b/Lib/IMPL/Web/View/TTDocument.pm Thu Apr 18 02:21:28 2013 +0400 @@ -24,6 +24,7 @@ props => [ layout => PROP_RW, loader => PROP_RW, + baseLocation => PROP_RW ] }; @@ -50,7 +51,7 @@ $this->context->stash->update({ require => sub { $registry->Require(shift) }, - document => $this + document => sub { $this } }); my $text = eval { @@ -89,6 +90,8 @@ undef $registry; $this->context->delocalise(); + undef $this; + if ($e) { die $e; } else {