Mercurial > pub > Impl

comparison Lib/IMPL/Web/View/TTControl.pm @ 212:292226770180

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
bugfixes
author sergey
date Fri, 29 Jun 2012 19:24:15 +0400
parents 4d0e1962161c
children d6e2ea24af08
comparison
equal deleted inserted replaced
211:2b9b55cfb79b 212:292226770180
55 my ($this,$args) = @_; 55 my ($this,$args) = @_;
56 56
57 $args ||= {}; 57 $args ||= {};
58 58
59 if ( my $ctor = $this->template->blocks->{CTOR} ) { 59 if ( my $ctor = $this->template->blocks->{CTOR} ) {
60 $this->context->include($ctor, { %$args, this => $this } ); 60 $this->context->include($ctor, { %$args, this => $this, template => $this->template } );
61 } 61 }
62 } 62 }
63 63
64 sub renderBlock { 64 sub renderBlock {
65 $_[0]->template->blocks->{RENDER} || $_[0]->template; 65 $_[0]->template->blocks->{RENDER} || $_[0]->template;
83 my $method = ($AUTOLOAD =~ m/(\w+)$/)[0]; 83 my $method = ($AUTOLOAD =~ m/(\w+)$/)[0];
84 84
85 return if $method eq 'DESTROY'; 85 return if $method eq 'DESTROY';
86 86
87 my $this = shift; 87 my $this = shift;
88 88
89 $this->nodeProperty($method,@_); 89 $this->nodeProperty($method,@_);
90 } 90 }
91 91
92 1; 92 1;
93 93