From c98de0e4f0e5cc64917cbf56298add82f5ffa435 Mon Sep 17 00:00:00 2001 From: Philippe PITTOLI Date: Thu, 25 Apr 2024 23:03:33 +0200 Subject: [PATCH] DomainList: put table elements in proper "td" html tags. --- src/App/Page/DomainList.purs | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/src/App/Page/DomainList.purs b/src/App/Page/DomainList.purs index dd500d0..68ac10e 100644 --- a/src/App/Page/DomainList.purs +++ b/src/App/Page/DomainList.purs @@ -241,15 +241,14 @@ render { accepted_domains, my_domains, newDomainForm, askDomainTransferForm, act [ HH.td_ [ Bulma.btn domain.name (EnterDomain domain.name) ] , HH.td_ [ HH.text $ fromMaybe "" domain.share_key ] , if A.length domain.owners == 1 - then Bulma.alert_btn "Unshare" (UnshareDomain domain.name) - else Bulma.btn_ro (C.is_warning) "Cannot unshare it" + then HH.td_ [ Bulma.alert_btn "Unshare" (UnshareDomain domain.name) ] + else HH.td_ [ Bulma.btn_ro (C.is_warning) "Cannot unshare it" ] ] owned_domain_row domain = HH.tr_ [ HH.td_ [ Bulma.btn domain.name (EnterDomain domain.name) ] - , HH.td_ [ Bulma.btn_ro (C.is_warning) "Share" ] - -- , Bulma.btn "Share" (ShareDomain domain.name) - , Bulma.alert_btn "Delete" (DeleteDomainModal domain.name) + , HH.td_ [ Bulma.btn "Share" (ShareDomain domain.name) ] + , HH.td_ [ Bulma.alert_btn "Delete" (DeleteDomainModal domain.name) ] ] render_add_domain_form = HH.form