# HG changeset patch # User cin # Date 1367477029 -14400 # Node ID 109f286430251fc311ba44b1fadf24451c683549 # Parent ec4ec1f056fe71da8de9337e6e495a409c9e3f28 sync diff -r ec4ec1f056fe -r 109f28643025 Lib/IMPL/Web/View/TTControl.pm --- a/Lib/IMPL/Web/View/TTControl.pm Tue Apr 30 01:27:05 2013 +0400 +++ b/Lib/IMPL/Web/View/TTControl.pm Thu May 02 10:43:49 2013 +0400 @@ -107,6 +107,12 @@ ); } +sub HasBlock { + my ($this,$block) = @_; + + $this->GetTemplate ? 1 : 0; +} + sub AUTOLOAD { our $AUTOLOAD;