module Web.View.Hubs.Edit where

import Web.Types
import Generated.Types
import IHP.Prelude
import IHP.ViewPrelude
import Web.Routes ()

data EditView = EditView { hub :: !Hub }

instance View EditView where
    html EditView { .. } = [hsx|
        <div class="max-w-lg">
            <div class="flex items-center gap-2 text-sm text-gray-500 mb-4">
                <a href={HubsAction} class="hover:text-gray-700">Hubs</a>
                <span>/</span>
                <a href={ShowHubAction (hub.id)} class="hover:text-gray-700">{hub.name}</a>
                <span>/</span>
                <span>Edit</span>
            </div>
            <h1 class="text-2xl font-semibold mb-6">Edit Hub</h1>
            {renderForm hub}
        </div>
    |]

renderForm :: Hub -> Html
renderForm hub = formFor hub [hsx|
    {textField #name}
    {(textField #slug) { helpText = "Lowercase, URL-safe identifier" }}
    {textField #domain}
    {submitButton}
|]