~singpolyma/cheogram-smtp

99b426b3f36c40d026099719eab42b79bcf215a1 — Stephen Paul Weber 1 year, 2 months ago 4f0a7f9
Make the + optional

Google Fi at least doesn't send it in headers
1 files changed, 1 insertions(+), 1 deletions(-)

M MMS.hs
M MMS.hs => MMS.hs +1 -1
@@ 55,7 55,7 @@ instance Aeson.ToJSON MMS where

telParser :: Atto.Parser Tel
telParser = do
	_ <- Atto.char '+'
	_ <- Atto.option '+' (Atto.char '+')
	tel <- Atto.takeWhile isDigit
	return $ Tel (s"+" ++ tel)