prefer String instance of ToYaml over [Char]
commitd650a53f7a76f6ed2fda3d8ff856596089ea9f69
authorDaniel Bergey <bergey@simspace.com>
dateSat 11 Apr 2020, 17:19 (7 years ago)
parent17318fc
yaml/src/Data/Yaml/Builder.hs+1−1
@@ -75,7 +75,7 @@ instance ToYaml a => ToYaml [a] where
7575 toYaml = array . map toYaml
7676instance ToYaml Text where
7777 toYaml = string
78−instance ToYaml String where
78+instance {-# OVERLAPPING #-} ToYaml String where
7979 toYaml = string . T.pack
8080instance ToYaml Int where
8181 toYaml i = YamlBuilder (EventScalar (S8.pack $ show i) NoTag PlainNoTag Nothing:)