richter 2004/03/07 12:04:15
Modified: . Changes.pod
Embperl/Syntax EmbperlHTML.pm
Log:
fix xml output of <form>
Revision Changes Path
1.234 +1 -1 embperl/Changes.pod
Index: Changes.pod
===================================================================
RCS file: /home/cvs/embperl/Changes.pod,v
retrieving revision 1.233
retrieving revision 1.234
diff -u -r1.233 -r1.234
--- Changes.pod 7 Mar 2004 19:44:14 -0000 1.233
+++ Changes.pod 7 Mar 2004 20:04:15 -0000 1.234
@@ -18,7 +18,7 @@
Reported by Edwin Ramirez.
- Fixed problem with encrypted source files and set key length.
Reported by Edwin Ramirez.
- - Fixed problem with <a /> and <option /> in xml output mode.
+ - Fixed problem with <a />, <form /> and <option /> in xml output mode.
Reported by Jochen Topf.
- Fixed problem with relativ cookie expires time.
Patch from Torsten Luettgert.
1.7 +2 -2 embperl/Embperl/Syntax/EmbperlHTML.pm
Index: EmbperlHTML.pm
===================================================================
RCS file: /home/cvs/embperl/Embperl/Syntax/EmbperlHTML.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- EmbperlHTML.pm 7 Mar 2004 19:36:35 -0000 1.6
+++ EmbperlHTML.pm 7 Mar 2004 20:04:15 -0000 1.7
@@ -161,7 +161,7 @@
$self -> AddTag ('embed', undef, ['src'], undef, undef) ;
$self -> AddTag ('layer', undef, ['src'], undef, undef) ;
$self -> AddTag ('img', undef, ['src'], undef, undef) ;
- $self -> AddTag ('form', undef, ['action'], undef, undef, undef, 2) ;
+ $self -> AddTag ('form', undef, ['action'], undef, undef, { 'nodename' =>
':<:>:form:', 'cdatatype' => ntypAttrValue, procinfo => {} }, 2) ;
}
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
