Tolerate more apostrophes

check-spelling · Sep 28, 2023 · 3b11c85 · 3b11c85
1 parent 697744a
commit 3b11c85
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/CheckSpelling/UnknownWordSplitter.pm b/lib/CheckSpelling/UnknownWordSplitter.pm
@@ -244,7 +244,7 @@ sub split_line {
 
   my ($words, $unrecognized) = (0, 0);
   my ($line, $unique_ref, $unique_unrecognized_ref, $unrecognized_line_items_ref) = @_;
-    $line =~ s/$rsqm|&apos;|&#39;/'/g;
+    $line =~ s/(?:$rsqm|&apos;|&#39;|\%27|')+/'/g;
     $line =~ s/(?:$ignore_pattern)+/ /g;
     while ($line =~ s/($upper_pattern{2,})($upper_pattern$lower_pattern{2,})/ $1 $2 /g) {}
     while ($line =~ s/((?:$lower_pattern|$punctuation_pattern)+)($upper_pattern)/$1 $2/g) {}