View | Details | Raw Unified | Return to bug 6958
Collapse All | Expand All

(-)a/misc/translator/tmpl_process3.pl (-8 / +14 lines)
Lines 35-48 sub find_translation ($) { Link Here
35
    my($s) = @_;
35
    my($s) = @_;
36
    my $key = $s;
36
    my $key = $s;
37
    if ($s =~ /\S/s) {
37
    if ($s =~ /\S/s) {
38
    $key = TmplTokenizer::string_canon($key);
38
      $key = TmplTokenizer::string_canon($key);
39
    $key = TmplTokenizer::charset_convert($key, $charset_in, $charset_out);
39
      $key = TmplTokenizer::charset_convert($key, $charset_in, $charset_out);
40
    $key = TmplTokenizer::quote_po($key);
40
      $key = TmplTokenizer::quote_po($key);
41
    }
42
    if (defined $href->{$key} && !$href->{$key}->fuzzy && length Locale::PO->dequote($href->{$key}->msgstr)){
43
	if ($s =~ /^(\s+)/){
44
	    return $1 . Locale::PO->dequote($href->{$key}->msgstr);
45
	}
46
	else {
47
	    return Locale::PO->dequote($href->{$key}->msgstr);
48
	}
49
    }
50
    else {
51
	return $s;
41
    }
52
    }
42
    return defined $href->{$key}
43
        && !$href->{$key}->fuzzy
44
        && length Locale::PO->dequote($href->{$key}->msgstr)?
45
       Locale::PO->dequote($href->{$key}->msgstr): $s;
46
}
53
}
47
54
48
sub text_replace_tag ($$) {
55
sub text_replace_tag ($$) {
49
- 

Return to bug 6958