git.iko.soy/typeable/aeson
on master help sign in
Add example of worse camelTo behavior for clarity
935fd7aKostiantyn Rybnikov
Data/Aeson/Types/Internal.hs+1
compare with master
unifiedsplit
@@ -535,6 +535,7 @@ camelTo c = lastWasCap True
535
535
536-- | Better version of 'camelTo'. Example where it works better:
536-- | Better version of 'camelTo'. Example where it works better:
537--
537--
538+-- > camelTo '_' 'CamelAPICase' == "camel_apicase"
538-- > camelTo2 '_' 'CamelAPICase' == "camel_api_case"
539-- > camelTo2 '_' 'CamelAPICase' == "camel_api_case"
539camelTo2 :: Char -> String -> String
540camelTo2 :: Char -> String -> String
540camelTo2 c = map toLower . go2 . go1
541camelTo2 c = map toLower . go2 . go1