diff --git a/src/App/DomainListInterface.purs b/src/App/DomainListInterface.purs
index 8d4328e..c9909f1 100644
--- a/src/App/DomainListInterface.purs
+++ b/src/App/DomainListInterface.purs
@@ -13,7 +13,6 @@ module App.DomainListInterface where
 
 import Prelude (Unit, bind, discard, map, otherwise, pure, ($), (/=), (<<<), (<>))
 
-import CSSClasses as CSSClasses
 import Data.Array as A
 import Data.ArrayBuffer.Types (ArrayBuffer)
 import Data.Either (Either(..))
@@ -211,13 +210,13 @@ render { accepted_domains, my_domains, newDomainForm, wsUp, active_modal }
       = [ HH.button
             [ HP.type_ HP.ButtonSubmit
             , HE.onClick \_ -> DeleteDomainModal domain
-            , HP.classes CSSClasses.button
+            , HP.classes $ C.button <> C.is_danger
             ]
-            [ HH.text "x" ]
+            [ HH.text "delete" ]
         , HH.button
             [ HP.type_ HP.ButtonSubmit
             , HE.onClick \_ -> EnterDomain domain
-            , HP.classes CSSClasses.button
+            , HP.classes C.button
             ]
             [ HH.text domain ]
         ]