bugfix 810036
This commit is contained in:
parent
5831547a35
commit
f28ff56377
1 changed files with 4 additions and 0 deletions
|
|
@ -105,6 +105,10 @@ sub start {
|
||||||
}
|
}
|
||||||
$self->output("<$tag");
|
$self->output("<$tag");
|
||||||
for (keys %$attr) {
|
for (keys %$attr) {
|
||||||
|
if ($_ eq '/') {
|
||||||
|
$self->output('/');
|
||||||
|
next;
|
||||||
|
}
|
||||||
$self->output(" $_=\"");
|
$self->output(" $_=\"");
|
||||||
my $val = $attr->{$_};
|
my $val = $attr->{$_};
|
||||||
if ((lc($tag) eq "input" || lc($tag) eq "textarea" || lc($tag) eq "select")
|
if ((lc($tag) eq "input" || lc($tag) eq "textarea" || lc($tag) eq "select")
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue