02/02: website: List languages in two columns.

[Florian Pelz]

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

commit a076562297db72b45ac82f7627a23e4be615d558
Author: Florian Pelz <pelzflorian@pelzflorian.de>
AuthorDate: Thu May 25 16:22:18 2023 +0200

    website: List languages in two columns.
    
    * website/apps/base/templates/components.scm (navbar): Specify a CSS
    class for the languages dropdown list.
    * website/static/base/css/navbar.css (languages-dropdown-list): New
    rule.
---
 website/apps/base/templates/components.scm | 3 ++-
 website/static/base/css/navbar.css         | 3 +++
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/website/apps/base/templates/components.scm 
b/website/apps/base/templates/components.scm
index 5f4af9c..241c27e 100644
--- a/website/apps/base/templates/components.scm
+++ b/website/apps/base/templates/components.scm
@@ -1,5 +1,5 @@
 ;;; GNU Guix web site
-;;; Copyright © 2019 Florian Pelz <pelzflorian@pelzflorian.de>
+;;; Copyright © 2019, 2023 Florian Pelz <pelzflorian@pelzflorian.de>
 ;;; Copyright © 2021 Simon Tournier <zimon.toutoune@gmail.com>
 ;;; Initially written by sirgazil who waives all
 ;;; copyright interest on this file.
@@ -501,6 +501,7 @@ manual.
       ,(menu-dropdown #:label (locale-display-name) #:active-item active-item
         #:items
         (append
+          (list '(@ (class "languages-dropdown-list")))
           (map-in-order
            (lambda (ietf-info)
              (let ((lingua (car ietf-info))
diff --git a/website/static/base/css/navbar.css 
b/website/static/base/css/navbar.css
index 974516a..c2dce90 100644
--- a/website/static/base/css/navbar.css
+++ b/website/static/base/css/navbar.css
@@ -117,6 +117,9 @@ label.menu-item {
     display: none;
 }
 
+.languages-dropdown-list {
+    columns: 2;
+}