git.iko.soy/denis
on master help sign in
Merge pull request #150 from ilyakooo0/actual-develop
43352bdiko
denis/src/Data/Tags/Validation.hs−1
compare with master
unifiedsplit
@@ -22,5 +22,4 @@ validChars :: S.Set Char
22validChars = S.fromList "йцукенгшщзхъфывапролджэёячсмитьбюqwertyuiopasdfghjklzxcvbnm1234567890_"
22validChars = S.fromList "йцукенгшщзхъфывапролджэёячсмитьбюqwertyuiopasdfghjklzxcvbnm1234567890_"
23
23
24validChar :: Char -> Bool
24validChar :: Char -> Bool
25−validChar = True
26validChar c = S.member (C.toLower c) validChars
25validChar c = S.member (C.toLower c) validChars