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

(-)a/C4/Charset.pm (-1 / +3 lines)
Lines 301-306 to work, at the possible risk of some data loss. Link Here
301
301
302
sub StripNonXmlChars {
302
sub StripNonXmlChars {
303
    my $str = shift;
303
    my $str = shift;
304
    if (!defined($str) || $str eq ""){
305
        return "";
306
    }
304
    $str =~ s/[^\x09\x0A\x0D\x{0020}-\x{D7FF}\x{E000}-\x{FFFD}\x{10000}-\x{10FFFF}]//g;
307
    $str =~ s/[^\x09\x0A\x0D\x{0020}-\x{D7FF}\x{E000}-\x{FFFD}\x{10000}-\x{10FFFF}]//g;
305
    return $str;
308
    return $str;
306
}
309
}
307
- 

Return to bug 3600