module IHP.IDE.SchemaDesigner.View.Tables.New where import IHP.ViewPrelude import IHP.IDE.SchemaDesigner.Types import IHP.IDE.ToolServer.Types import IHP.IDE.ToolServer.Routes () import IHP.IDE.SchemaDesigner.View.Layout data NewTableView = NewTableView { statements :: [Statement] } instance View NewTableView where html NewTableView { .. } = [hsx|
{renderObjectSelector (zip [0..] statements) Nothing} {emptyColumnSelectorContainer}
{migrationStatus} {renderModal modal} |] where modalContent = [hsx|
Use the plural form and underscores. E.g.: projects, companies, user_reactions
|] modalFooter = mempty modalCloseUrl = pathTo TablesAction modalTitle = "New Table" modal = Modal { modalContent, modalFooter, modalCloseUrl, modalTitle }