From b318d2b8e388574ad8ad5307403b15d418e97dfa Mon Sep 17 00:00:00 2001
From: acli <acli>
Date: Tue, 17 Feb 2004 06:30:38 +0000
Subject: [PATCH] Don't extract strings from the VALUE attributes of RADIO type
 INPUT fields; these aren't translatable.

---
 misc/translator/text-extract2.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/misc/translator/text-extract2.pl b/misc/translator/text-extract2.pl
index 0c97b32d35..d67cc21875 100755
--- a/misc/translator/text-extract2.pl
+++ b/misc/translator/text-extract2.pl
@@ -67,7 +67,7 @@ sub text_extract ($) {
 		if ($attr->{$a}) {
 		    next if $a eq 'content' && $tag ne 'meta';
 		    next if $a eq 'value' && ($tag ne 'input'
-			|| (ref $attr->{'type'} && $attr->{'type'}->[1] eq 'hidden')); # FIXME
+			|| (ref $attr->{'type'} && $attr->{'type'}->[1] =~ /^(?:hidden|radio)$/)); # FIXME
 		    my($key, $val, $val_orig, $order) = @{$attr->{$a}}; #FIXME
 		    $val = TmplTokenizer::trim $val;
 		    $text{$val} = 1 if $val =~ /\S/s;
-- 
2.39.5