comparison Lib/IMPL/DOM/Node.pm @ 188:029c9610528c

Memory leak tests in IMPL::Web::View
author cin
date Tue, 03 Apr 2012 20:08:42 +0400
parents d1676be8afcc
children 4d0e1962161c
comparison
equal deleted inserted replaced
187:927653d01f4f 188:029c9610528c
367 } 367 }
368 368
369 sub nodeProperty { 369 sub nodeProperty {
370 my $this = shift; 370 my $this = shift;
371 my $name = shift; 371 my $name = shift;
372
373 return unless defined $name;
372 374
373 if (my $method = $this->can($name)) { 375 if (my $method = $this->can($name)) {
374 unshift @_,$this; 376 unshift @_,$this;
375 # use goto to preserve calling context 377 # use goto to preserve calling context
376 goto &$method; 378 goto &$method;