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