Lines 64-71
sub text_replace_tag ($$) {
Link Here
|
64 |
if ($attr->{$a}) { |
64 |
if ($attr->{$a}) { |
65 |
next if $a eq 'label' && $tag ne 'optgroup'; |
65 |
next if $a eq 'label' && $tag ne 'optgroup'; |
66 |
next if $a eq 'content' && $tag ne 'meta'; |
66 |
next if $a eq 'content' && $tag ne 'meta'; |
67 |
next if $a eq 'value' && ($tag ne 'input' || (ref $attr->{'type'} && $attr->{'type'}->[1] =~ /^(?:checkbox|hidden|radio|text)$/)); # FIXME |
67 |
my $isValidType = ref $attr->{'type'} && $attr->{'type'}->[1] =~ /^(?:checkbox|hidden|radio|text)$/; |
68 |
|
68 |
next if $a eq 'value' && !($tag eq 'input' && $isValidType); |
69 |
my($key, $val, $val_orig, $order) = @{$attr->{$a}}; #FIXME |
69 |
my($key, $val, $val_orig, $order) = @{$attr->{$a}}; #FIXME |
70 |
if ($val =~ /\S/s) { |
70 |
if ($val =~ /\S/s) { |
71 |
my $s = find_translation($val); |
71 |
my $s = find_translation($val); |
72 |
- |
|
|