on master help sign in
I now allow new line characters
commit515d6822e1459612da27be939af621b29fc50f8c authoriko <ilyakooo0@gmail.com> dateTue 14 May 2019, 01:22 (7 years ago) parent01e8fb7
2 files changed+4−2
denis/src/Data/Limits.hs+2−2 denis/src/Data/Text/Validator.hs+2
denis/src/Data/Limits.hs+2−2
@@ -14,7 +14,7 @@ maxMessageLimitName :: Int
1414maxMessageLimitName = 60
1515
1616postElementLengthLimit :: Int
17−postElementLengthLimit = 10000
17+postElementLengthLimit = 35000
1818
1919userFieldLengthLimit :: Int
2020userFieldLengthLimit = 50
@@ -29,4 +29,4 @@ listLimit :: Int
2929listLimit = 100
3030
3131globalTextLimit :: Int
32−globalTextLimit = 20000
32+globalTextLimit = 50000
denis/src/Data/Text/Validator.hs+2
@@ -15,6 +15,8 @@ import Data.Char
1515import Data.Limits
1616
1717isValidChar :: Char -> Bool
18+isValidChar '\n' = True
19+isValidChar '\r' = True
1820isValidChar = isPrint
1921
2022class HasValidatableText t where