From 3f6bff6ca30d062fd421cc7806b34e3ea4da12db Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Thu, 9 Mar 2017 14:18:35 +0100
Subject: website: Add post about GSoC.

* website/posts/join-gnu-guix-for-gsoc-2017.md: New file.
* website/haunt.scm: Add COMMONMARK-READER.
* website/www.scm (sxml->string*)[sxml->strings]: Automatically wrap
lists in <div>.
---
 website/www.scm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'website/www.scm')

diff --git a/website/www.scm b/website/www.scm
index dd21722..0babe92 100644
--- a/website/www.scm
+++ b/website/www.scm
@@ -1,5 +1,5 @@
 ;;; GuixSD website --- GNU's advanced distro website
-;;; Copyright © 2015, 2016 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2015, 2016, 2017 Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright © 2015 Mathieu Lirzin <mthl@openmailbox.org>
 ;;; Initially written by Luis Felipe López Acevedo <felipe.lopez@openmailbox.org>
 ;;; who waives all copyright interest on this file.
@@ -59,7 +59,9 @@ string."
       (((? symbol?) body ...)
        (append-map sxml->strings body))
       ((? string?)
-       (list tree))))
+       (list tree))
+      ((lst ...)
+       (sxml->strings `(div ,@lst)))))
 
   (string-concatenate (sxml->strings tree)))
 
-- 
cgit v1.2.3