diff Lib/IMPL/Web/View/TTControl.pm @ 314:109f28643025

sync
author cin
date Thu, 02 May 2013 10:43:49 +0400
parents 2da2564f115d
children 71221d79e6b4
line wrap: on
line diff
--- 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;