diff --git a/Cloogle/DB/Factory.icl b/Cloogle/DB/Factory.icl index 33a39ba8a6db293bbee10515286fadcf8d7c37cc..413f7d6b59431ee5cff092da5b2be367dadc6686 100644 --- a/Cloogle/DB/Factory.icl +++ b/Cloogle/DB/Factory.icl @@ -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