01/01: website: contact: Fix HTML validation error (DIVs inside P).

[Luis Felipe López Acevedo]

lfla pushed a commit to branch master
in repository guix-artwork.

commit b951df49798db870aab5ebd4c63d70d2d0c6c8cf
Author: sirgazil <address@hidden>
Date:   Wed Feb 6 11:42:37 2019 -0500

    website: contact: Fix HTML validation error (DIVs inside P).
    
    * apps/base/templates/components.scm: Fix P element used as container
      of DIV elements.
    * apps/base/templates/contact.scm: Use new style sheet.
    * static/base/css/contact.css: New style sheet.
---
 website/apps/base/templates/components.scm | 3 ++-
 website/apps/base/templates/contact.scm    | 3 ++-
 website/static/base/css/contact.css        | 3 +++
 3 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/website/apps/base/templates/components.scm 
b/website/apps/base/templates/components.scm
index 443a976..413295c 100644
--- a/website/apps/base/templates/components.scm
+++ b/website/apps/base/templates/components.scm
@@ -150,7 +150,8 @@
     ;; The description can be a list of language/blurb pairs.
     ,(match (contact-description contact)
        ((((? string? languages) blurbs) ...)
-        `(p ,@(map (lambda (language blurb)
+        `(div (@ (id "help-guix-mailing-list-description"))
+         ,@(map (lambda (language blurb)
                      `(div (@ (style "display: flex; align-items: center; 
margin: 0 10px 10px 0"))
                            ,(language-tag language)
                            (div (@ (lang ,language) (style "flex: 1")) 
,blurb)))
diff --git a/website/apps/base/templates/contact.scm 
b/website/apps/base/templates/contact.scm
index b4a5dda..10122af 100644
--- a/website/apps/base/templates/contact.scm
+++ b/website/apps/base/templates/contact.scm
@@ -24,7 +24,8 @@
    #:active-menu-item "About"
    #:css (list
          (guix-url "static/base/css/page.css")
-          (guix-url "static/base/css/buttons.css"))
+          (guix-url "static/base/css/buttons.css")
+         (guix-url "static/base/css/contact.css"))
    #:crumbs (list (crumb "Contact" "./"))
    #:content
    `(main
diff --git a/website/static/base/css/contact.css 
b/website/static/base/css/contact.css
new file mode 100644
index 0000000..a58b68f
--- /dev/null
+++ b/website/static/base/css/contact.css
@@ -0,0 +1,3 @@
+#help-guix-mailing-list-description {
+    margin: 1.5rem 0;
+}
\ No newline at end of file