@@ -135,7 +135,7 @@ jsonToYaml (String "") = empty
135135jsonToYaml (String s) =
136136 case T.unpack s of
137137 x | '\n' `elem` x -> hang 2 ("|" <> cr) $ text x
138− | not (any (`elem` x) "\"'#:[]{},?-") -> text x
138+ | not (any (`elem` x) "\"'#:[]{}?-") -> text x
139139 | otherwise -> text $ "'" ++ substitute "'" "''" x ++ "'"
140140jsonToYaml (Bool b) = text $ show b
141141jsonToYaml (Number n) = text $ show n