From 3532a08c2e609772fea9cb48b4d5ded62a579d5f Mon Sep 17 00:00:00 2001 From: Thomas Lefebvre Date: Mon, 22 Apr 2024 11:54:09 -0400 Subject: [PATCH] =?UTF-8?q?Add=20"=E2=9C=93"=20as=20accepted=20char?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Our vendor had no issues with it --- lib/Intlc/Linter.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/Intlc/Linter.hs b/lib/Intlc/Linter.hs index 1953a51..0f29da2 100644 --- a/lib/Intlc/Linter.hs +++ b/lib/Intlc/Linter.hs @@ -175,7 +175,7 @@ interpolationsRule ast = fmap (pure . (start,)) . count . idents $ ast where -- we've established are safe for use with our vendor's tool. isAcceptedChar :: Char -> Bool isAcceptedChar c = isAscii c || c `elem` acceptedChars - where acceptedChars = ['’','…','é','—','ƒ','“','”','–'] + where acceptedChars = ['’','…','é','—','ƒ','“','”','–','✓'] unsupportedUnicodeRule :: Rule AnnLint unsupportedUnicodeRule = nonEmpty . nonAscii where