module IHP.IDE.SchemaDesigner.View.Enums.Edit where import IHP.ViewPrelude import IHP.IDE.SchemaDesigner.Types import IHP.IDE.ToolServer.Types import IHP.IDE.SchemaDesigner.View.Layout data EditEnumView = EditEnumView { statements :: [Statement] , enumName :: Text , enumId :: Int } instance View EditEnumView where html EditEnumView { .. } = [hsx|
{renderObjectSelector (zip [0..] statements) Nothing} {emptyColumnSelectorContainer}
{migrationStatus} {renderModal modal} |] where modalContent = [hsx|
|] modalFooter = mempty modalCloseUrl = pathTo TablesAction modalTitle = "Edit Enum" modal = Modal { modalContent, modalFooter, modalCloseUrl, modalTitle }