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