-- | UPPER_SNAKE_CASE to kebab-case
sToK :: String -> String
sToK = map (Char.toLower . replaceIf '_' '-')
sToK :: String -> String
sToK = map (Char.toLower . replaceIf '_' '-')
sToK = map (Char.toLower . replaceIf '_' '-')