01/02: website: contact: Add paragraph about the code of conduct.

[Ludovic Courtès]

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

commit bafb3c289de9545e7963f78e0635da0e98f8395b
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Sun Mar 20 11:49:34 2022 +0100

    website: contact: Add paragraph about the code of conduct.
    
    Discussed at
    <https://lists.gnu.org/archive/html/guix-devel/2022-02/msg00352.html>.
    
    * website/apps/base/templates/contact.scm (contact-t): Add paragraph
    about the code of conduct.
---
 website/apps/base/templates/contact.scm | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)

diff --git a/website/apps/base/templates/contact.scm 
b/website/apps/base/templates/contact.scm
index 7ecd354..49d8393 100644
--- a/website/apps/base/templates/contact.scm
+++ b/website/apps/base/templates/contact.scm
@@ -35,6 +35,26 @@ channels|Bug reports|Help") #\|)
       (@ (class "page centered-block limit-width"))
       ,(G_ `(h2 "Contact"))
 
+      ,(G_
+        `(p
+          "We want to provide a warm, friendly, and harassment-free 
environment,
+           so that anyone can contribute to the best of their abilities.  To
+           this end our project uses a “Contributor Covenant”, which was 
adapted
+           from "
+          ,(G_ ((lambda (url)
+                  `(a (@ (href ,url)) ,url))
+                "https://contributor-covenant.org/";))
+          ".  You can find the full pledge in the "
+          ,(G_
+            `(a (@ (href 
"//git.savannah.gnu.org/cgit/guix.git/tree/CODE-OF-CONDUCT")
+                   (class "mono"))
+                "CODE-OF-CONDUCT"))
+          " file."))
+
+      ,(G_
+        `(p "Participation to the project communication channels listed below
+            is subject to this code of conduct."))
+
       ,@(map
         contact->shtml
         (context-datum context "contact-media"))))))