Mercurial > pub > Impl
comparison Lib/IMPL/Web/View/TTDocument.pm @ 303:a5eb64c6e6f7
TTDocument.GetTemplate corrected to work with document blocks
| author | cin |
|---|---|
| date | Mon, 08 Apr 2013 02:18:47 +0400 |
| parents | aeeb57a12046 |
| children | 2ff513227cb4 |
comparison
equal
deleted
inserted
replaced
| 302:673581380e79 | 303:a5eb64c6e6f7 |
|---|---|
| 86 | 86 |
| 87 $this->context->localise(); | 87 $this->context->localise(); |
| 88 $documentContext = _clone_context( $this->context ); | 88 $documentContext = _clone_context( $this->context ); |
| 89 | 89 |
| 90 $this->context->stash->set(require => $require); | 90 $this->context->stash->set(require => $require); |
| 91 $this->context->stash->set(document => sub { $self }); | 91 $this->context->stash->set(document => sub { $self }); |
| 92 | 92 |
| 93 my $text = eval { | 93 my $text = eval { |
| 94 | 94 |
| 95 if ($this->layout) { | 95 if ($this->layout) { |
| 96 my $tlayout = $this->loader->layout($this->layout); | 96 my $tlayout = $this->loader->layout($this->layout); |
| 133 } else { | 133 } else { |
| 134 return $text; | 134 return $text; |
| 135 } | 135 } |
| 136 } | 136 } |
| 137 | 137 |
| 138 sub GetTemplate { | |
| 139 my ($this,$name) = @_; | |
| 140 | |
| 141 $this->template->blocks->{$name}; | |
| 142 } | |
| 143 | |
| 138 sub _clone_context { | 144 sub _clone_context { |
| 139 my $args = { %{shift || {}} }; | 145 my $args = { %{shift || {}} }; |
| 140 delete $args->{CONFIG}; | 146 delete $args->{CONFIG}; |
| 141 | 147 |
| 142 return Template::Context->new($args); | 148 return Template::Context->new($args); |
