civodul pushed a commit to branch wip-haunt
in repository guix-artwork.
commit bccda311c2f1f61dedeece4fc402dee99d98668e
Author: Ludovic Courtès <l...@gnu.org>
Date: Wed Oct 26 00:57:30 2016 +0200
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 ...)
...
