DomainList: put table elements in proper "td" html tags.

This commit is contained in:
Philippe PITTOLI 2024-04-25 23:03:33 +02:00
parent 797f2ce248
commit c98de0e4f0

View File

@ -241,15 +241,14 @@ render { accepted_domains, my_domains, newDomainForm, askDomainTransferForm, act
[ HH.td_ [ Bulma.btn domain.name (EnterDomain domain.name) ] [ HH.td_ [ Bulma.btn domain.name (EnterDomain domain.name) ]
, HH.td_ [ HH.text $ fromMaybe "" domain.share_key ] , HH.td_ [ HH.text $ fromMaybe "" domain.share_key ]
, if A.length domain.owners == 1 , if A.length domain.owners == 1
then Bulma.alert_btn "Unshare" (UnshareDomain domain.name) then HH.td_ [ Bulma.alert_btn "Unshare" (UnshareDomain domain.name) ]
else Bulma.btn_ro (C.is_warning) "Cannot unshare it" else HH.td_ [ Bulma.btn_ro (C.is_warning) "Cannot unshare it" ]
] ]
owned_domain_row domain = HH.tr_ owned_domain_row domain = HH.tr_
[ HH.td_ [ Bulma.btn domain.name (EnterDomain domain.name) ] [ HH.td_ [ Bulma.btn domain.name (EnterDomain domain.name) ]
, HH.td_ [ Bulma.btn_ro (C.is_warning) "Share" ] , HH.td_ [ Bulma.btn "Share" (ShareDomain domain.name) ]
-- , Bulma.btn "Share" (ShareDomain domain.name) , HH.td_ [ Bulma.alert_btn "Delete" (DeleteDomainModal domain.name) ]
, Bulma.alert_btn "Delete" (DeleteDomainModal domain.name)
] ]
render_add_domain_form = HH.form render_add_domain_form = HH.form