diff options
| author | sirgazil <felipe.lopez@openmailbox.org> | 2016-11-22 14:29:07 -0500 |
|---|---|---|
| committer | sirgazil <felipe.lopez@openmailbox.org> | 2016-11-22 14:29:07 -0500 |
| commit | 368ec7de00f4eaff708bb0d636c86700daa25502 (patch) | |
| tree | eb72086c0246ac37951590313dc816a9ff5c4abd | |
| parent | e7a919b6bb6f22506137742690f06af3627703db (diff) | |
| download | guix-artwork-368ec7de00f4eaff708bb0d636c86700daa25502.tar guix-artwork-368ec7de00f4eaff708bb0d636c86700daa25502.tar.gz | |
website: Fix missing HTML document type declaration (see bug #24981)
* haunt.scm (site): Add doctype declaration.
* www/news.scm (base-layout): Ditto.
| -rw-r--r-- | website/haunt.scm | 6 | ||||
| -rw-r--r-- | website/www/news.scm | 17 |
2 files changed, 13 insertions, 10 deletions
diff --git a/website/haunt.scm b/website/haunt.scm index ed78634..4c5c6df 100644 --- a/website/haunt.scm +++ b/website/haunt.scm @@ -74,7 +74,7 @@ #:builders `(,(lambda (site posts) ;the main page (with-url-parameters - (make-page "guix.html" (main-page site posts) + (make-page "guix.html" `((doctype "html") ,(main-page site posts)) sxml->html))) ,@(filter-map (match-lambda (("guix.html" _) ;handled above @@ -82,7 +82,9 @@ ((file-name contents) (lambda (site posts) (with-url-parameters - (make-page file-name (contents) sxml->html))))) + (make-page file-name + `((doctype "html") ,(contents)) + sxml->html))))) %web-pages) ,(blog #:theme (parameterized-theme %news-haunt-theme) #:prefix "news") diff --git a/website/www/news.scm b/website/www/news.scm index 849fc44..e6b59ef 100644 --- a/website/www/news.scm +++ b/website/www/news.scm @@ -56,17 +56,18 @@ posts)))) (define (base-layout body) - `(html (@ (lang "en")) - ,(html-page-header "News" #:css "news.css") + `((doctype "html") + (html (@ (lang "en")) + ,(html-page-header "News" #:css "news.css") - (body - ,(html-page-description) - ,(html-page-links) + (body + ,(html-page-description) + ,(html-page-links) - (div (@ (id "content-box")) - (article ,body)) + (div (@ (id "content-box")) + (article ,body)) - ,(html-page-footer)))) + ,(html-page-footer))))) (define %news-haunt-theme ;; Theme for the rendering of the news pages. |