diff options
-rw-r--r-- | test/DOMTSHandler.pm | 4 | ||||
-rw-r--r-- | test/testcases/tests/level1/html/HTMLFormElement09.xml (renamed from test/testcases/tests/level1/html/HTMLFormElement09.xml.kfail) | 0 | ||||
-rw-r--r-- | test/testcases/tests/level1/html/HTMLFormElement10.xml (renamed from test/testcases/tests/level1/html/HTMLFormElement10.xml.kfail) | 0 |
3 files changed, 2 insertions, 2 deletions
diff --git a/test/DOMTSHandler.pm b/test/DOMTSHandler.pm index 6545332..65efff3 100644 --- a/test/DOMTSHandler.pm +++ b/test/DOMTSHandler.pm @@ -665,9 +665,9 @@ sub generate_method { } $method = to_cmethod($ats{'interface'}, $en); - + my $cast = to_attribute_cast($ats{'interface'}); my $ns = $dd->find("parameters/param", $node); - my $params = "$ats{'obj'}"; + my $params = "${cast}$ats{'obj'}"; for ($count = 1; $count <= $ns->size; $count++) { my $n = $ns->get_node($count); my $p = $n->getAttribute("name"); diff --git a/test/testcases/tests/level1/html/HTMLFormElement09.xml.kfail b/test/testcases/tests/level1/html/HTMLFormElement09.xml index 4f552d6..4f552d6 100644 --- a/test/testcases/tests/level1/html/HTMLFormElement09.xml.kfail +++ b/test/testcases/tests/level1/html/HTMLFormElement09.xml diff --git a/test/testcases/tests/level1/html/HTMLFormElement10.xml.kfail b/test/testcases/tests/level1/html/HTMLFormElement10.xml index 8d1f3b4..8d1f3b4 100644 --- a/test/testcases/tests/level1/html/HTMLFormElement10.xml.kfail +++ b/test/testcases/tests/level1/html/HTMLFormElement10.xml |