embed entities to the results returned by procs

2016-06-28 12:09:58 +03:00
parent 2f166088c8
commit 430baf23b9
4 changed files with 25 additions and 18 deletions
@@ -13,7 +13,7 @@ data DbStructure = DbStructure {
 , dbColumns     :: [Column]
 , dbRelations   :: [Relation]
 , dbPrimaryKeys :: [PrimaryKey]
-, dbProcsReturningJWT :: [Text]
+, dbProcs       :: [(Text,Text)]
 } deriving (Show, Eq)

 type Schema = Text