blob 6cd51a02dfe5b1ef1c77b6ecb651e87d155846c8 1294 bytes (raw)
name: website/apps/media/templates/community.scm # note: path name is non-authoritative(*)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
| | ;;; GNU Guix web site
;;; Copyright © 2020 Julien Lepiller <julien@lepiller.eu>
;;; Initially written by sirgazil who waives all
;;; copyright interest on this file.
(define-module (apps media templates community)
#:use-module (apps base templates theme)
#:use-module (apps base utils)
#:use-module (apps i18n)
#:use-module (apps media templates components)
#:export (community-t))
(define (community-t community-resources)
"Return an SHTML page for all COMMUNITY-RESOURCES."
(theme
#:title (C_ "webpage title" '("Community"))
#:description (G_ "Links to resources created by the community")
#:keywords
(string-split ;TRANSLATORS: |-separated list of webpage keywords
(G_ "GNU|Linux|Unix|Free software|Libre software|Operating \
system|GNU Hurd|GNU Guix package manager|GNU Guile|Guile \
Scheme|Transactional upgrades|Functional package \
management|Reproducibility") #\|)
#:active-menu-item (C_ "website menu" "Media")
#:css (list (guix-url "static/base/css/index.css")
(guix-url "static/base/css/item-preview.css")
(guix-url "static/media/css/community.css"))
#:content
`(main
(section
(@ (class "page"))
(div
(@ (class "resource-box"))
,@(map resource->shtml community-resources))))))
|
debug log:
solving 6cd51a0 ...
found 6cd51a0 in https://yhetil.org/guix-patches/20201009003823.0a15114b@tachikoma/
applying [1/1] https://yhetil.org/guix-patches/20201009003823.0a15114b@tachikoma/
diff --git a/website/apps/media/templates/community.scm b/website/apps/media/templates/community.scm
new file mode 100644
index 0000000..6cd51a0
Checking patch website/apps/media/templates/community.scm...
Applied patch website/apps/media/templates/community.scm cleanly.
index at:
100644 6cd51a02dfe5b1ef1c77b6ecb651e87d155846c8 website/apps/media/templates/community.scm
(*) Git path names are given by the tree(s) the blob belongs to.
Blobs themselves have no identifier aside from the hash of its contents.^
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/guix.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).