comparison Lib/IMPL/Web/QueryHandler/PageFormat.pm @ 134:44977efed303

Significant performance optimizations Fixed recursion problems due converting objects to JSON Added cache support for the templates Added discovery feature for the web methods
author wizard
date Mon, 21 Jun 2010 02:39:53 +0400
parents e4f15cbc3f1a
children f6af119ac741
comparison
equal deleted inserted replaced
133:a07a66fd8d5c 134:44977efed303
12 BEGIN { 12 BEGIN {
13 public property templatesCharset => prop_all; 13 public property templatesCharset => prop_all;
14 public property templatesBase => prop_all; 14 public property templatesBase => prop_all;
15 public property defaultTarget => prop_all; 15 public property defaultTarget => prop_all;
16 public property pathinfoPrefix => prop_all; 16 public property pathinfoPrefix => prop_all;
17 public property cache => prop_all;
17 } 18 }
18 19
19 sub CTOR { 20 sub CTOR {
20 my ($this) = @_; 21 my ($this) = @_;
21 22
22 $this->templatesCharset('utf-8') unless $this->templatesCharset; 23 $this->templatesCharset('utf-8') unless $this->templatesCharset;
24 $this->cache(File::Spec->rel2abs($this->cache)) if $this->cache;
25 $this->templatesBase(File::Spec->rel2abs($this->templatesBase)) if $this->templatesBase;
23 } 26 }
24 27
25 sub Process { 28 sub Process {
26 my ($this,$action,$nextHandler) = @_; 29 my ($this,$action,$nextHandler) = @_;
27 30
28 my $doc = new IMPL::Web::TT::Document(); 31 my $doc = new IMPL::Web::TT::Document(cache => $this->cache);
29 32
30 try { 33 try {
31 34
32 $this->templatesBase($ENV{DOCUMENT_ROOT}) unless $this->templatesBase; 35 $this->templatesBase($ENV{DOCUMENT_ROOT}) unless $this->templatesBase;
33 36