Re: [tclwebtest] XHTML doesn't allow name attributes for form tag
Status: Abandoned
Brought to you by:
tils
Menu
▾
▴
Re: [tclwebtest] XHTML doesn't allow name attributes for form tag
|
From: Vinod K. <vi...@ku...> - 2006-03-18 01:07:19
|
Here's the patch as well as some test files to place under the selftest
directory.
Index: lib/tclwebtest.tcl
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /cvsroot/tclwebtest/tclwebtest/lib/tclwebtest.tcl,v
retrieving revision 1.73
diff -u -b -B -r1.73 tclwebtest.tcl
--- lib/tclwebtest.tcl 4 Jan 2006 16:50:11 -0000 1.73
+++ lib/tclwebtest.tcl 18 Mar 2006 01:01:53 -0000
@@ -3025,6 +3025,7 @@
set a_form(enctype) [get_attribute $form_tag enctype ""]
set a_form(name) [get_attribute $form_tag name]
+ append a_form(name) [get_attribute $form_tag id]
set a_form(id) [get_attribute $form_tag id]
# get the content - everything that is inside the form but not
form-name-id.test:
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
do_request "file://$TESTHOME/form-name-id.html"
form find ~n myname
log "Found form via name attribute."
form find ~n myid
log "Found form via id attribute."
form-name-id.html:
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
<html>
<body>
<form name=3D"myname" id=3D"myid">
</form>
</body>
</html>
How does that look?
Vinod
|
