(name . Luis Felipe via Guix-patches)(address . guix-patches@gnu.org)
Hi,
This patch converts the Help item of the navigation bar into a dropdown menu as proposed in the thread "Document our WIP" (https://lists.gnu.org/archive/html/guix-devel/2021-03/msg00532.html).
---
Luis Felipe López Acevedo
From dad14c86f4feee4a5e41748db4935870afe15e43 Mon Sep 17 00:00:00 2001
From: Luis Felipe <luis.felipe.la@protonmail.com>
Date: Thu, 8 Apr 2021 14:34:37 -0500
Subject: [PATCH] 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 | 40 +++++++++++++++++++++-
1 file changed, 39 insertions(+), 1 deletion(-)
Toggle diff (55 lines)
diff --git a/website/apps/base/templates/components.scm b/website/apps/base/templates/components.scm
index 7ca76cc..c965d41 100644
--- a/website/apps/base/templates/components.scm
+++ b/website/apps/base/templates/components.scm
@@ -405,7 +405,45 @@ 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 "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/")))
base-commit: c46cc7d80a1e90d3d841e5b59f6e131bf2052c87
--
2.31.0