blob: 734ec508cc2eda7dbdf1abecd2f0f88ec36fc46b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
;;; Harmonic Flow web site
(define-module (apps base templates menu)
#:use-module (apps base templates components)
#:use-module (apps base templates theme)
#:use-module (apps base utils)
#:use-module (apps i18n)
#:export (menu-t))
(define (menu-t)
"Return the Menu page in SHTML."
(theme
#:title (C_ "webpage title" '("Menu"))
#:description (G_ "Website menu.")
#:keywords
(string-split ;TRANSLATORS: |-separated list of webpage keywords
(G_ "Harmonic Flow|HFGE|Free Software|C++|Libre software|Graphics Programming|Vulkan") #\|)
#:active-menu-item (C_ "website menu" "Menu")
#:css (list (hfweb-url "static/base/css/menu.css"))))
|
