comparison Lib/IMPL/DOM/Node.pm @ 21:fafe56cfcd69

temp commit
author Sergey
date Wed, 30 Sep 2009 10:25:41 +0400
parents 818c74b038ae
children 7f00786f8210
comparison
equal deleted inserted replaced
20:267460284fb3 21:fafe56cfcd69
232 my ($this) = @_; 232 my ($this) = @_;
233 233
234 join '', $this->nodeValue || '', map $_->nodeValue || '', @{$this->childNodes}; 234 join '', $this->nodeValue || '', map $_->nodeValue || '', @{$this->childNodes};
235 } 235 }
236 236
237 sub Property { 237 sub nodeProperty {
238 my $this = shift; 238 my $this = shift;
239 my $name = shift; 239 my $name = shift;
240 240
241 if (@_) { 241 if (@_) {
242 # set 242 # set