Ticket #681: 681_pl.patch

File 681_pl.patch, 0.7 KB (added by wwalc, 2 years ago)

Proposal fix for the Perl implementation

  • editor/dialog/fck_spellerpages/spellerpages/server-scripts/spellchecker.pl

     
    5858        # open temp file, add the submitted text. 
    5959        for( my $i = 0; $i <= $#textinputs; $i++ ) { 
    6060                $text = url_decode( $textinputs[$i] ); 
     61                # Strip all tags for the text. (by FredCK - #339 / #681) 
     62                $text =~ s/<[^>]+>/ /g; 
    6163                @lines = split( /\n/, $text ); 
    6264                print $fh "\%\n"; # exit terse mode 
    6365                print $fh "^$input_separator\n";