diff --git a/src/App/ZoneInterface.purs b/src/App/ZoneInterface.purs index fa624ad..d7bd7cc 100644 --- a/src/App/ZoneInterface.purs +++ b/src/App/ZoneInterface.purs @@ -2,8 +2,7 @@ -- | -- | This interface allows to: -- | - display all resource records of a zone --- | - * DONE: NS, A, AAAA, CNAME, TXT, MX, SRV --- | - * TODO: SOA +-- | - * DONE: SOA, NS, A, AAAA, CNAME, TXT, MX, SRV -- | - add new resource records -- | - TODO: modify resource records -- | - remove resource records diff --git a/src/Bulma.purs b/src/Bulma.purs index 28d195d..b3e2769 100644 --- a/src/Bulma.purs +++ b/src/Bulma.purs @@ -256,7 +256,7 @@ btn_change action1 action2 modified validity [ HP.disabled (not modified) , btn_change_action validity , HP.classes $ btn_classes validity - ] [ HH.text "fix" ] + ] [ HH.text "save" ] where btn_change_action = case _ of @@ -268,7 +268,7 @@ btn_delete action = HH.button [ HE.onClick action , HP.classes [ HH.ClassName "button is-small is-danger" ] - ] [ HH.text "X" ] + ] [ HH.text "remove" ] btn_add :: forall w i. i -> i -> Boolean -> HH.HTML w i