comparison Lib/IMPL/Web/View/TTControl.pm @ 192:a9faf883cdce

IMPL::Web::View refactoring
author cin
date Fri, 06 Apr 2012 16:22:38 +0400
parents 78a18a2b6266
children 4d0e1962161c
comparison
equal deleted inserted replaced
191:78a18a2b6266 192:a9faf883cdce
38 $this->id($name . "-" . _GetNextId()) unless $this->id; 38 $this->id($name . "-" . _GetNextId()) unless $this->id;
39 39
40 weaken($this); # prevent cyclic references produces by the code below 40 weaken($this); # prevent cyclic references produces by the code below
41 41
42 $context->stash->set('append', sub { $this->appendChild(@_); undef; } ); 42 $context->stash->set('append', sub { $this->appendChild(@_); undef; } );
43 $context->stash->set('select', sub { $this->selectNodes(@_) } ); 43 $context->stash->set('select', sub { $this->selectNodes(@_); } );
44 44
45 } 45 }
46 46
47 our %CTOR = ( 47 our %CTOR = (
48 'IMPL::DOM::Node' => sub { 48 'IMPL::DOM::Node' => sub {