summaryrefslogtreecommitdiff
path: root/website/apps/base/templates/help.scm
blob: 00ba17fecfdaf74c9bd0b594b6df3926440738f7 (about) (plain)
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
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
;;; GNU Guix web site
;;; Initially written by sirgazil who waves all
;;; copyright interest on this file.

(define-module (apps base templates help)
  #:use-module (apps base templates components)
  #:use-module (apps base templates theme)
  #:use-module (apps base types)
  #:use-module (apps base utils)
  #:export (help-t))


(define (help-t)
  "Return the Help page in SHTML."
  (theme
   #:title '("Help")
   #:description
   "A list of resources about how to use GNU Guix, plus
   information about getting help from the community of users and
   developers."
   #:keywords
   '("GNU" "Linux" "Unix" "Free software" "Libre software"
     "Operating system" "GNU Hurd" "GNU Guix package manager"
     "Help resources")
   #:active-menu-item "Help"
   #:css (list
	  (guix-url "static/base/css/page.css")
	  (guix-url "static/base/css/item-preview.css"))
   #:crumbs (list (crumb "Help" "./"))
   #:content
   `(main
     (section
      (@ (class "page"))
      (h2 "Help")

      (div
       (@ (class "centered-text"))

       (div
	(@ (class "summary-box"))
	(img
	 (@ (src ,(guix-url "static/base/img/manual-icon.png"))
	    (alt "")))
	(h3 "Guix System Manual")
	(p
	 "The documentation about the Guix System Distribution is
         available online as part of the GNU Guix package manager
         manual.")
	(p
	 ,(link-more
	   #:label "Read Guix System manual"
	   #:url (manual-url "GNU-Distribution.html"))))


       (div
	(@ (class "summary-box"))
	(img
	 (@ (src ,(guix-url "static/base/img/manual-icon.png"))
	    (alt "")))
	(h3 "GNU Guix Manual")
	(p
	 "Documentation for the GNU Guix package manager is available
         online. You may also find more information about Guix by running "
	 (code "info guix") ".")
	(p
	 ,(link-more
	   #:label "Read Guix manual"
	   #:url (if (getenv "GUIX_WEB_SITE_INFO")
                 (guix-url "manual/en/")
                 (guix-url "manual/")))
     ,(link-more
	   #:label "Get Guix reference card"
	   #:url (if (getenv "GUIX_WEB_SITE_INFO")
                 "https://www.gnu.org/software/guix/guix-refcard.pdf"
                 (guix-url "guix-refcard.pdf")))))


       (div
	(@ (class "summary-box"))
	(img (@ (src ,(guix-url "static/base/img/library-icon.png"))
		(alt "")))
	(h3 "GNU Manuals")
	(p
	 "Guix is a distribution of the "
	 (a (@ (href ,(gnu-url))) "GNU operating system")
	 ".  Documentation for GNU packages is
         available online in various formats. ")
	(p
	 ,(link-more
	   #:label "Browse GNU manuals"
	   #:url (gnu-url "manual"))))


       (div
	(@ (class "summary-box"))
	(img (@ (src ,(guix-url "static/base/img/chat-icon.png"))
		(alt "")))
	(h3 "IRC Chat")
	(p
	 "For real-time support from the community, you can connect
         to the " (code "#guix") " channel on irc.freenode.net. There
         you can get help about anything related to GNU Guix.")
	(p
	 "The " (code "#guix") " channel is logged. Previous
         conversations can be browsed online. See the "
	 (a (@ (href ,guix-irc-log-url)) "channel logs") ". ")
	(p
	 ,(link-more
	   #:label "Connect"
	   #:url (guix-url "contact/irc/"))))


       (div
	(@ (class "summary-box"))
	(img (@ (src ,(guix-url "static/base/img/email-icon.png"))
		(alt "")))
	(h3 "Mailing lists")
	(p
	 "Email support from the community is also available through
         several mailing list. The messages sent to the lists are
         public and archived online.")

	(p
	 ,(link-more
	   #:label "See all lists"
	   #:url (guix-url "contact/")))))))))