From 65adbb052f7d27c382b7f9f3c665635aeab96a02 Mon Sep 17 00:00:00 2001
From: Philip K <philip@warpmail.net>
Date: Wed, 14 Aug 2019 22:21:34 +0200
Subject: atom: Change date format from ISO-8601 to RFC-3339.

* haunt/builder/atom.scm (date->string*): Format in RFC-3339 style.
---
 haunt/builder/atom.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/haunt/builder/atom.scm b/haunt/builder/atom.scm
index 60f710d..2a6c356 100644
--- a/haunt/builder/atom.scm
+++ b/haunt/builder/atom.scm
@@ -133,8 +133,8 @@
   (sxml->xml sxml port))
 
 (define (date->string* date)
-  "Convert date to ISO-8601 formatted string."
-  (date->string date "~4"))
+  "Convert date to RFC-3339 formatted string."
+  (date->string date "~Y-~m-~dT~H:~M:~SZ"))
 
 (define* (post->atom-entry site post #:key (blog-prefix ""))
   "Convert POST into an Atom <entry> XML node."
-- 
cgit v1.2.3