Verified Commit ca5fc26b authored by Camil Staps's avatar Camil Staps 🚀

Update for name change in Platform

parent c5472e17
......@@ -804,7 +804,7 @@ record_functions etd = [
, fe_representation=Just $ concat [".", f, " :: ":print False t]
, fe_documentation=(\d -> {FunctionDoc | gDefault{|*|} & description=Just d}) <$> doc
}
\\ (f,t) <- 'Clean.Types'.recordsToFunctions ('Cloogle.DB'.getTypeDef etd)
\\ (f,t) <- 'Clean.Types'.selectorsToFunctions ('Cloogle.DB'.getTypeDef etd)
& doc <- field_doc]
where
field_doc = fromMaybe [] (docFields =<< 'Cloogle.DB'.getTypeDefDoc etd) ++ repeat Nothing
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment