branch master updated: website: Add Help dropdown menu.

[Mathieu Othacehe]

This is an automated email from the git hooks/post-receive script.

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

The following commit(s) were added to refs/heads/master by this push:
     new 321813e  website: Add Help dropdown menu.
321813e is described below

commit 321813e88f06e1743c75a1a3b7fe9a0705514a80
Author: Luis Felipe <luis.felipe.la@protonmail.com>
AuthorDate: Sat Apr 10 10:00:51 2021 -0500

    website: Add Help dropdown menu.
    
    This change converts the Help item of the primary navigation of
    the website into a dropdown menu listing the items currently available
    in the Help page.
    
    This was proposed in the thread "Document our WIP" sent to
    the guix-devel mailing list on March 27, 2021.
    
    * website/apps/base/templates/components.scm (navbar): Make Help a dropdown.
---
 website/apps/base/templates/components.scm | 46 +++++++++++++++++++++++++++++-
 1 file changed, 45 insertions(+), 1 deletion(-)

diff --git a/website/apps/base/templates/components.scm 
b/website/apps/base/templates/components.scm
index 7ca76cc..5440408 100644
--- a/website/apps/base/templates/components.scm
+++ b/website/apps/base/templates/components.scm
@@ -405,7 +405,51 @@ manual.
                            (menu-item #:label "Latest"
                                       #:active-item active-item
                                       #:url (guix-url "download/latest/")))))
-      ,(C_ "website menu" (menu-item #:label "Help" #:active-item active-item 
#:url (guix-url "help/")))
+
+      ,(menu-dropdown
+        #:label (C_ "website menu" "Help")
+        #:active-item active-item
+        #:items
+        (list
+         (C_ "website menu"
+             (menu-item #:label "All"
+                        #:active-item active-item
+                        #:url (guix-url "help/")))
+         (C_ "website menu"
+             (menu-item #:label "GNU Guix Manual"
+                        #:active-item active-item
+                        #:url (guix-url "manual/")))
+         (C_ "website menu"
+             (menu-item #:label "Guix Reference Card"
+                        #:active-item active-item
+                        #:url (guix-url "guix-refcard.pdf")))
+         (C_ "website menu"
+             (menu-item #:label "Videos"
+                        #:active-item active-item
+                        #:url (guix-url "videos/")))
+         (C_ "website menu"
+             (menu-item #:label "Cookbook"
+                        #:active-item active-item
+                        #:url (guix-url "cookbook/")))
+         (C_ "website menu"
+             (menu-item #:label "GNU Manuals"
+                        #:active-item active-item
+                        #:url (gnu-url "manual/")))
+         (C_ "website menu"
+             (menu-item #:label "Wiki"
+                        #:active-item active-item
+                        #:url
+                        (identity "https://libreplanet.org/wiki/Group:Guix";)))
+         (C_ "website menu"
+             (menu-item #:label "IRC Chat"
+                        #:active-item active-item
+                        #:url (guix-url "contact/irc/")))
+         (C_ "website menu"
+             (menu-item #:label "Mailing Lists"
+                        #:active-item active-item
+                        #:url (guix-url "contact/")))))
+
+
       ,(C_ "website menu" (menu-item #:label "Packages" #:active-item 
active-item #:url (guix-url "packages/")))
       ,(C_ "website menu" (menu-item #:label "Blog" #:active-item active-item 
#:url (guix-url "blog/")))