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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
|
;;; GNU Guix web site
;; Copyright © 2017 ng0 <ng0@infotropique.org>
;;; Initially written by sirgazil who waves all
;;; copyright interest on this file.
;;;
;;; This file is part of the GNU Guix web site.
;;;
;;; The GNU Guix web site is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU Affero General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; The GNU Guix web site is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU Affero General Public License for more details.
;;;
;;; You should have received a copy of the GNU Affero General Public License
;;; along with the GNU Guix web site. If not, see <http://www.gnu.org/licenses/>.
(define-module (apps download templates download)
#:use-module (apps base templates theme)
#:use-module (apps base types)
#:use-module (apps base utils)
#:use-module (apps download templates components)
#:export (download-t))
(define (download-t context)
"Return the Download page in SHTML."
(theme
#:title '("Download")
#:description
"Installers and source files for GNU Guix. GNU Guix can be
installed on different GNU/Linux distributions."
#:keywords
'("GNU" "Linux" "Unix" "Free software" "Libre software"
"Operating system" "GNU Hurd" "GNU Guix package manager"
"Installer" "Source code" "Package manager")
#:active-menu-item "Download"
#:css (list
(guix-url "static/base/css/page.css")
(guix-url "static/base/css/download.css"))
#:crumbs (list (crumb "Download" "./"))
#:content
`(main
(section
(@ (class "page"))
(h2 "Download")
(p
(@ (class "centered-block limit-width"))
"As of version " ,(latest-guix-version)
", the standalone Guix System "
(a
(@ (href ,(manual-url "System-Installation.html")))
"can be installed")
" on an i686, x86_64, ARMv7, or AArch64 machine. It uses the "
(a (@ (href ,(gnu-url "software/linux-libre"))) "Linux-Libre")
" kernel and the "
(a (@ (href ,(gnu-url "software/shepherd"))) "GNU Shepherd")
" init system. Alternately, GNU Guix
can be installed as an additional package manager on top of an
installed Linux-based system.")
(div
(@ (class "centered-text"))
,@(map download (context-datum context "downloads")))
(p
(@ (class "centered-block limit-width"))
"Source code and binaries for the Guix System distribution ISO
image as well as GNU Guix can be found on the GNU servers at "
(a (@ (href "https://ftp.gnu.org/gnu/guix/"))
"https://ftp.gnu.org/gnu/guix/")
". Older releases can still be found on "
(a (@ (href "https://alpha.gnu.org/gnu/guix/"))
"alpha.gnu.org") ".")))))
|
