diff --git a/src/App/Page/Authentication.purs b/src/App/Page/Authentication.purs
index d7862f2..7d06bd4 100644
--- a/src/App/Page/Authentication.purs
+++ b/src/App/Page/Authentication.purs
@@ -199,14 +199,14 @@ render { current_tab, authenticationForm, passwordRecoveryForm, newPasswordForm,
     auth_form = [ Bulma.h3 "Authentication", render_auth_form ]
     passrecovery_form =
       [ Bulma.h3 "You forgot your password (or your login)"
-      , Bulma.div_content
+      , Bulma.div_content []
         [ Bulma.p "Enter either your login or email and you'll receive a recovery token."
         ]
       , render_password_recovery_form
       ]
     newpass_form =
       [ Bulma.h3 "You got the password recovery mail"
-      , Bulma.div_content
+      , Bulma.div_content []
         [ Bulma.p "Nice! You get to choose your new password."
         ]
       , render_new_password_form
diff --git a/src/App/Page/DomainList.purs b/src/App/Page/DomainList.purs
index b0c9629..a0b4998 100644
--- a/src/App/Page/DomainList.purs
+++ b/src/App/Page/DomainList.purs
@@ -218,7 +218,16 @@ render { accepted_domains, my_domains, newDomainForm, askDomainTransferForm, del
                             ]
         else Bulma.p "No domain yet."
       ]
-    render_new_domain = [ Bulma.h3 "New domain", render_add_domain_form ]
+    render_new_domain =
+      [ Bulma.h3 "New domain"
+      , Bulma.quote [ Bulma.p "The heart of dnsmanager! 🎉"
+                    , Bulma.p "You can reserve a domain name, right here."
+                    , HH.text """
+                        Later you will be able to change the content, share, transfer or even delete the domain.
+                        """
+                    ]
+      , render_add_domain_form
+      ]
 
     render_gain_ownership =
       [ Bulma.h3 "Get the ownership of a domain"
diff --git a/src/App/Page/Home.purs b/src/App/Page/Home.purs
index 74324d6..cc44d2a 100644
--- a/src/App/Page/Home.purs
+++ b/src/App/Page/Home.purs
@@ -55,9 +55,9 @@ render _ = HH.div_
              ]
   where
     title = Bulma.h3
-    expl content = Bulma.div_content [ Bulma.explanation content ]
+    expl content = Bulma.div_content [] [ Bulma.explanation content ]
     p = Bulma.p
-    b x = Bulma.column_ [ Bulma.box [ Bulma.div_content x ] ]
+    b x = Bulma.column_ [ Bulma.box [ Bulma.div_content [] x ] ]
 
     render_description = Bulma.columns_ [ render_basics, render_no_expert, render_no_housing ]
     render_update_why_and_contact = Bulma.columns_ [ render_updates, render_why, render_contact ]
diff --git a/src/App/Page/Zone.purs b/src/App/Page/Zone.purs
index 911af3e..10d68cb 100644
--- a/src/App/Page/Zone.purs
+++ b/src/App/Page/Zone.purs
@@ -447,7 +447,7 @@ render state
           ]
         modal_content_srv :: Array (HH.HTML w Action)
         modal_content_srv =
-          [ Bulma.div_content [Bulma.explanation Explanations.srv_introduction]
+          [ Bulma.div_content [] [Bulma.explanation Explanations.srv_introduction]
           , render_errors
           , Bulma.box_input "domainSRV" "Service name" "service name"
               (updateForm Field_Domain)
@@ -473,7 +473,7 @@ render state
           ]
         modal_content_spf :: Array (HH.HTML w Action)
         modal_content_spf =
-          [ Bulma.div_content [Bulma.explanation Explanations.spf_introduction]
+          [ Bulma.div_content [] [Bulma.explanation Explanations.spf_introduction]
           , render_errors
           , Bulma.input_with_side_text "domainSPF" "Name" "Let this alone."
               (updateForm Field_Domain)
@@ -511,13 +511,13 @@ render state
           , Bulma.hr
           , Bulma.box
             [ Bulma.h3 "Default behavior"
-            , Bulma.div_content [Bulma.explanation Explanations.spf_default_behavior]
+            , Bulma.div_content [] [Bulma.explanation Explanations.spf_default_behavior]
             , Bulma.selection SPF_Qualifier qualifier_types (maybe default_qualifier_str show_qualifier state._currentRR.q)
             ]
           ]
         modal_content_dkim :: Array (HH.HTML w Action)
         modal_content_dkim =
-          [ Bulma.div_content [Bulma.explanation Explanations.dkim_introduction]
+          [ Bulma.div_content [] [Bulma.explanation Explanations.dkim_introduction]
           , render_errors
           , Bulma.input_with_side_text "domainDKIM" "Name" "default._domainkey"
               (updateForm Field_Domain)
@@ -527,7 +527,7 @@ render state
               (updateForm Field_TTL)
               (show state._currentRR.ttl)
           , Bulma.hr
-          , Bulma.div_content [Bulma.explanation Explanations.dkim_default_algorithms]
+          , Bulma.div_content [] [Bulma.explanation Explanations.dkim_default_algorithms]
           , Bulma.selection_field "idDKIMSignature" "Signature algo"
               DKIM_sign_algo
               (map show DKIM.sign_algos)
@@ -542,7 +542,7 @@ render state
 
         modal_content_dmarc :: Array (HH.HTML w Action)
         modal_content_dmarc =
-          [ Bulma.div_content [Bulma.explanation Explanations.dmarc_introduction]
+          [ Bulma.div_content [] [Bulma.explanation Explanations.dmarc_introduction]
           , render_errors
           , Bulma.input_with_side_text "domainDMARC" "Name" "_dmarc"
               (updateForm Field_Domain)
@@ -551,27 +551,27 @@ render state
           , Bulma.box_input "ttlDMARC" "TTL" "600" (updateForm Field_TTL) (show state._currentRR.ttl)
 
           , Bulma.hr
-          , Bulma.div_content [Bulma.explanation Explanations.dmarc_policy]
+          , Bulma.div_content [] [Bulma.explanation Explanations.dmarc_policy]
           , Bulma.selection_field' "idDMARCPolicy" "Policy" DMARC_policy
               (A.zip DMARC.policies_txt DMARC.policies_raw)
               (show state.dmarc.p)
-          , Bulma.div_content [Bulma.explanation Explanations.dmarc_sp_policy]
+          , Bulma.div_content [] [Bulma.explanation Explanations.dmarc_sp_policy]
           , Bulma.selection_field' "idDMARCPolicy_sp" "Policy for subdomains" DMARC_sp_policy
               (zip_nullable DMARC.policies_txt_with_null DMARC.policies_raw)
               (maybe "-" show state.dmarc.sp)
 
           , Bulma.hr
-          , Bulma.div_content [Bulma.explanation Explanations.dmarc_adkim]
+          , Bulma.div_content [] [Bulma.explanation Explanations.dmarc_adkim]
           , Bulma.selection_field' "idDMARCadkim" "Consistency Policy for DKIM" DMARC_adkim
               (zip_nullable DMARC.consistency_policies_txt DMARC.consistency_policies_raw)
               (maybe "-" show state.dmarc.adkim)
-          , Bulma.div_content [Bulma.explanation Explanations.dmarc_aspf]
+          , Bulma.div_content [] [Bulma.explanation Explanations.dmarc_aspf]
           , Bulma.selection_field' "idDMARCaspf" "Consistency Policy for SPF"   DMARC_aspf
               (zip_nullable DMARC.consistency_policies_txt DMARC.consistency_policies_raw)
               (maybe "-" show state.dmarc.aspf)
 
           , Bulma.hr
-          , Bulma.div_content [Bulma.explanation Explanations.dmarc_pct]
+          , Bulma.div_content [] [Bulma.explanation Explanations.dmarc_pct]
           , Bulma.box_input "idDMARCpct" "Sample rate [0..100]" "100" DMARC_pct (maybe "100" show state.dmarc.pct)
 
           , Bulma.hr
@@ -580,7 +580,7 @@ render state
               (maybe "-" show state.dmarc.fo)
 
           , Bulma.hr
-          , Bulma.div_content [Bulma.explanation Explanations.dmarc_contact]
+          , Bulma.div_content [] [Bulma.explanation Explanations.dmarc_contact]
           , maybe (Bulma.p "There is no address to send aggregated reports to.")
             (display_dmarc_mail_addresses "Addresses to contact for aggregated reports" DMARC_remove_rua) state.dmarc.rua
           , maybe (Bulma.p "There is no address to send detailed reports to.")
@@ -595,7 +595,7 @@ render state
                         ] []
 
           , Bulma.hr
-          , Bulma.div_content [Bulma.explanation Explanations.dmarc_ri]
+          , Bulma.div_content [] [Bulma.explanation Explanations.dmarc_ri]
           , Bulma.box_input "idDMARCri" "Report interval (in seconds)" "86400" DMARC_ri (maybe "0" show state.dmarc.ri)
           ]
 
diff --git a/src/App/Text/Explanations.purs b/src/App/Text/Explanations.purs
index 4d06ee8..c49d7a5 100644
--- a/src/App/Text/Explanations.purs
+++ b/src/App/Text/Explanations.purs
@@ -6,7 +6,7 @@ import Bulma as Bulma
 expl' :: forall w i. String -> HH.HTML w i
 expl' text = expl [Bulma.p text]
 expl :: forall w i. Array (HH.HTML w i) -> HH.HTML w i
-expl content = Bulma.div_content [ Bulma.explanation content ]
+expl content = Bulma.div_content [] [ Bulma.explanation content ]
 expl_txt :: forall w i. String -> HH.HTML w i
 expl_txt content = Bulma.explanation [ Bulma.p content ]
 
diff --git a/src/Bulma.purs b/src/Bulma.purs
index 9db5cfd..c0df9f8 100644
--- a/src/Bulma.purs
+++ b/src/Bulma.purs
@@ -556,14 +556,14 @@ tag_light_info str = HH.span [HP.classes (C.tag <> C.is_info <> C.is_light)] [HH
 div_large_content :: forall w i. Array (HH.HTML w i) -> HH.HTML w i
 div_large_content content = HH.div [HP.classes (C.is_large <> C.content)] content
 
-div_content :: forall w i. Array (HH.HTML w i) -> HH.HTML w i
-div_content content = HH.div [HP.classes (C.content)] content
+div_content :: forall w i. Array HH.ClassName -> Array (HH.HTML w i) -> HH.HTML w i
+div_content classes content = HH.div [HP.classes (C.content <> classes)] content
 
 explanation :: forall w i. Array (HH.HTML w i) -> HH.HTML w i
 explanation content = HH.blockquote [HP.classes [HH.ClassName "justified"]] content
 
 quote :: forall w i. Array (HH.HTML w i) -> HH.HTML w i
-quote content = div_content [ explanation content ]
+quote content = div_content [] [ explanation content ]
 
 simple_quote :: forall w i. String -> HH.HTML w i
 simple_quote content = quote [ p content ]
@@ -610,6 +610,9 @@ notification' classes value =
   HH.div [HP.classes (C.notification <> classes)]
          [ HH.text value ]
 
+notification_primary' :: forall w i. String -> HH.HTML w i
+notification_primary' value = notification' C.is_primary value
+
 notification_warning' :: forall w i. String -> HH.HTML w i
 notification_warning' value = notification' C.is_warning value