comparison Lib/IMPL/Web/TT/Control.pm @ 109:ddf0f037d460

IMPL::DOM::Node updated to support TT, (added childNodesRef and selectNodesRef for using from TT) Some fixes to the web document model. (beta version)
author wizard
date Mon, 17 May 2010 05:12:08 +0400
parents c6fb6964de4c
children 0475eb382085
comparison
equal deleted inserted replaced
108:c6fb6964de4c 109:ddf0f037d460
15 my $nextId = 1; 15 my $nextId = 1;
16 16
17 sub CTOR { 17 sub CTOR {
18 my ($this,%args) = @_; 18 my ($this,%args) = @_;
19 19
20 if ($this->document) {
21 # load a template
22 #$args{template} = $this->document->context->template($args{template}) if ($args{template});
23 }
20 $this->template($args{template}) if $args{template}; 24 $this->template($args{template}) if $args{template};
25
21 $this->id($this->nodeName . '-' . $nextId++); 26 $this->id($this->nodeName . '-' . $nextId++);
22 $this->controlClass($args{controlClass} || 'Control'); 27 $this->controlClass($args{controlClass} || 'Control');
23 } 28 }
24 29
25 sub Render { 30 sub Render {