Baguette
/
dnsmanager-webclient
3
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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

display
Philippe PITTOLI 2024-04-25 23:03:33 +02:00
parent 797f2ce248
commit c98de0e4f0
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/App/Page/DomainList.purs
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_ [ 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