comparison parsedata.pl @ 33:ad96ed91de92

Fix recursive parsing with attributes.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 31 Oct 2011 09:31:14 +0200
parents b305d409becd
children bb00a40252e2
comparison
equal deleted inserted replaced
32:b305d409becd 33:ad96ed91de92
132 if (defined($$node{"name"})) { 132 if (defined($$node{"name"})) {
133 if ($$node{"name"} eq $name) { 133 if ($$node{"name"} eq $name) {
134 if ($args ne "") { 134 if ($args ne "") {
135 if (defined($$node{"args"}) && $$node{"args"} =~ /$args/) { 135 if (defined($$node{"args"}) && $$node{"args"} =~ /$args/) {
136 } else { 136 } else {
137 return undef; 137 return html_find_node($$node{"nodes"}, $name, $args);
138 } 138 }
139 } 139 }
140 return $node; 140 return $node;
141 } else { 141 } else {
142 return html_find_node($$node{"nodes"}, $name, $args); 142 return html_find_node($$node{"nodes"}, $name, $args);