Mercurial > pub > Impl
diff Lib/IMPL/Web/View/TTControl.pm @ 301:aeeb57a12046
*IMPL::Web::View: templates inheritance support
author | cin |
---|---|
date | Mon, 25 Mar 2013 02:04:18 +0400 |
parents | bf3af33b9003 |
children | 673581380e79 |
line wrap: on
line diff
--- a/Lib/IMPL/Web/View/TTControl.pm Fri Mar 22 01:05:11 2013 +0400 +++ b/Lib/IMPL/Web/View/TTControl.pm Mon Mar 25 02:04:18 2013 +0400 @@ -42,7 +42,7 @@ $this->attributes({}); - if(reftype($attrs) eq 'HASH') { + if(ref($attrs) eq 'HASH') { while (my($key,$value) = each %$attrs) { $this->SetAttribute($key,$value); } @@ -80,7 +80,7 @@ $args = {} unless ref $args eq 'HASH'; return $this->context->include( - $this->template, + $this->template->block, { %$args, this => $this,