From bccda311c2f1f61dedeece4fc402dee99d98668e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Wed, 26 Oct 2016 00:57:30 +0200
Subject: www: main-page: Tweak news item fetcher.

* website/www.scm (fetch-news): Use the 'xhtml' prefix instead of 'x'
for the xhtml namespace.
(news-items): Match the 'name' tag inside 'author.
---
 website/www.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/website/www.scm b/website/www.scm
index 244830b..01e6a93 100644
--- a/website/www.scm
+++ b/website/www.scm
@@ -57,7 +57,7 @@
         (lambda (port)
           (xml->sxml port
                      #:namespaces '((atom . "http://www.w3.org/2005/Atom")
-                                    (x . "http://www.w3.org/1999/xhtml"))
+                                    (xhtml . "http://www.w3.org/1999/xhtml"))
                      #:trim-whitespace? #t))))))
 
 (define-record-type <news-entry>
@@ -83,7 +83,7 @@
               (atom:link (@ (href ,link)))
               (atom:title ,title)
               (atom:updated ,updated)
-              (atom:author ,author)
+              (atom:author (atom:name ,author))
               (atom:content ,content)
               ,rest ...)
              ...
-- 
cgit v1.2.3