decodeYAML :: FromJSON a => FilePath -> IO a
decodeYAML = either error return . decodeEither <=< BS.readFile
decodeYAML :: FromJSON a => FilePath -> IO a
decodeYAML = either error return . decodeEither <=< BS.readFile
decodeYAML = either error return . decodeEither <=< BS.readFile