diff --git a/bin/checkwiki.pl b/bin/checkwiki.pl index 5b29e11..b4fd15b 100755 --- a/bin/checkwiki.pl +++ b/bin/checkwiki.pl @@ -2257,6 +2257,7 @@ sub error_006_defaultsort_with_special_letters { $test_text =~ s/[אבגדהוזחטיכךלמםנןסעפףצץקרשת]//g } + when ('fawiki') { $test_text =~ s/[ضصثقفغعهخحجچشسیبلاتنمکگظطزرذدپؤژؤئأإآة۱۲۳۴۵۶۷۸۹۰]]//g; } when ('fiwiki') { $test_text =~ s/[ÅÄÖåäö]//g; } when ('nowiki') { $test_text =~ s/[ÆØÅæøå]//g; } when ('nnwiki') { $test_text =~ s/[ÆØÅæøå]//g; } @@ -2564,7 +2565,11 @@ sub error_016_unicode_control_characters { $search = $search . "|\x{007F}|\x{200B}|\x{2028}|\x{202A}|\x{202C}|\x{202D}|\x{202E}|\x{00A0}|\x{00AD}|\x{202B}|\x{200F}|\x{2004}|\x{2005}|\x{2006}|\x{2007}|\x{2008}"; } - + if ( $project eq 'fawiki' ) { + $search = $search + . "|\x{007F}|\x{200B}|\x{2028}|\x{202A}|\x{202C}|\x{202D}|\x{202E}|\x{00A0}|\x{00AD}|\x{202B}|\x{200F}|\x{2004}|\x{2005}|\x{2006}|\x{2007}|\x{2008}|\x{0020}|\x{2000}|\x{2001}|\x{2002}|\x{2003}|\x{2009}|\x{200A}|\x{007F}|\x{200B}|\x{2028}|\x{202A}|\x{202C}|\x{202D}|\x{202E}|\x{00A0}|\x{00AD}|\x{202B}|\x{200F}"; + } + if ( $text =~ /($search)/ or $text =~ /(\p{Co})/ ) { my $test_text = $text; my $pos = index( $test_text, $1 ); @@ -3158,6 +3163,7 @@ sub error_037_title_with_special_letters_and_no_defaultsort { $test_title =~ s/[אבגדהוזחטיכךלמםנןסעפףצץקרשת]//g } + when ('fawiki') { $test_title =~ s/[ضصثقفغعهخحجچشسیبلاتنمکگظطزرذدپؤژؤئأإآة۱۲۳۴۵۶۷۸۹۰]//g; } when ('fiwiki') { $test_title =~ s/[ÅÄÖåäö]//g; } when ('nowiki') { $test_title =~ s/[ÆØÅæøå]//g; } when ('nnwiki') { $test_title =~ s/[ÆØÅæøå]//g; }