summaryrefslogtreecommitdiff
path: root/website
diff options
context:
space:
mode:
authorrekado <rekado@elephly.net>2016-12-13 17:35:40 +0100
committerRicardo Wurmus <rekado@elephly.net>2016-12-13 17:38:02 +0100
commit66f9450e766b36ed3a85174705c6d4ba8b6e36d1 (patch)
treedf971c6b04d9df5db61cee48d910f8aa92e498b4 /website
parent3ef3b0445241df1dc47c3717e63ffcf6267b3c70 (diff)
downloadguix-artwork-66f9450e766b36ed3a85174705c6d4ba8b6e36d1.tar
guix-artwork-66f9450e766b36ed3a85174705c6d4ba8b6e36d1.tar.gz
website: Move beta warning to GuixSD download box.
* website/www/shared.scm (html-page-description): Move beta warning from here... * website/www/download.scm (%usb-image-description): ...to here.
Diffstat (limited to 'website')
-rw-r--r--website/www/download.scm10
-rw-r--r--website/www/shared.scm8
2 files changed, 9 insertions, 9 deletions
diff --git a/website/www/download.scm b/website/www/download.scm
index e8c58ef..5c64376 100644
--- a/website/www/download.scm
+++ b/website/www/download.scm
@@ -26,7 +26,15 @@
#:export (download-page))
(define %usb-image-description
- "USB installer of the Guix System Distribution.")
+ `(div (div (@ (class "message-box msg-info"))
+ (span (@ (class "msg-label")) "Note ")
+ "The Guix System Distribution (GuixSD) is beta software, "
+ "which means it is "
+ (a (@ (href ,(base-url "manual/html_node/Limitations.html")))
+ "not production-ready")
+ ". But you can "
+ (a (@ (href ,(base-url "contribute"))) "help") "!")
+ (p "USB installer of the Guix System Distribution.")))
(define %usb-image-manual
"manual/html_node/System-Installation.html")
diff --git a/website/www/shared.scm b/website/www/shared.scm
index 04be0f4..5f93cf7 100644
--- a/website/www/shared.scm
+++ b/website/www/shared.scm
@@ -63,14 +63,6 @@ Functional package management,")))
(define (html-page-description)
`(div
- (div (@ (class "message-box msg-info"))
- (span (@ (class "msg-label")) "Note ")
- "The Guix System Distribution (GuixSD) is beta software, "
- "which means it is "
- (a (@ (href ,(base-url "manual/html_node/Limitations.html")))
- "not production-ready")
- ". But you can "
- (a (@ (href ,(base-url "contribute"))) "help") "!")
;; (div (@ (class "message-box donate-info"))
;; (span (@ (class "msg-label")) "Donate ")
;; "For Guix to grow we need to upgrade our hardware. Please consider "