Cleaner formatting of RSS XML

Author: chenglou

src/common/BlogApi.mjs

@@ -85,11 +85,11 @@ function toXmlString(siteTitleOpt, siteDescriptionOpt, items) {
   var itemsStr = Belt_Array.reduce(items, "", (function (acc, item) {
           var description = item.description;
           var href = item.href;
-          var descriptionElement = description === "" ? "" : "<description>\n        <![CDATA[" + description + "]]>\n        </description>\n          ";
+          var descriptionElement = description === "" ? "" : "<description>\n          <![CDATA[" + description + "]]>\n        </description>";
           var dateStr = dateToUTCString(item.pubDate);
-          return acc + ("\n      <item>\n        <title> <![CDATA[" + item.title + "]]></title>\n        <link> " + href + " </link>\n        <guid> " + href + " </guid>\n        " + descriptionElement + "\n\n        <pubDate>" + dateStr + "</pubDate>\n\n    </item>");
+          return acc + ("\n      <item>\n        <title> <![CDATA[" + item.title + "]]></title>\n        <link> " + href + " </link>\n        <guid> " + href + " </guid>\n        " + descriptionElement + "\n        <pubDate>" + dateStr + "</pubDate>\n      </item>");
         }));
-  return "<?xml version=\"1.0\" encoding=\"utf-8\" ?>\n  <rss version=\"2.0\">\n    <channel>\n        <title>" + siteTitle + "</title>\n        <link>https://rescript-lang.org</link>\n        <description>" + siteDescription + "</description>\n        <language>en</language>\n        " + latestPubDateElement + "\n        " + itemsStr + "\n\n    </channel>\n  </rss>";
+  return "<?xml version=\"1.0\" encoding=\"utf-8\" ?>\n  <rss version=\"2.0\">\n    <channel>\n        <title>" + siteTitle + "</title>\n        <link>https://rescript-lang.org</link>\n        <description>" + siteDescription + "</description>\n        <language>en</language>\n        " + latestPubDateElement + "\n" + itemsStr + "\n    </channel>\n  </rss>";
 }
 
 var RssFeed = {

src/common/BlogApi.res

@@ -144,9 +144,8 @@ module RssFeed = {
       let descriptionElement = switch description {
       | "" => ""
       | desc => j`<description>
-        <![CDATA[$desc]]>
-        </description>
-          `
+          <![CDATA[$desc]]>
+        </description>`
       }
 
       // TODO: convert pubdate to string
@@ -157,10 +156,8 @@ module RssFeed = {
         <link> $href </link>
         <guid> $href </guid>
         $descriptionElement
-
         <pubDate>$dateStr</pubDate>
-
-    </item>`
+      </item>`
     })
 
     let ret = j`<?xml version="1.0" encoding="utf-8" ?>
@@ -171,8 +168,7 @@ module RssFeed = {
         <description>$siteDescription</description>
         <language>en</language>
         $latestPubDateElement
-        $itemsStr
-
+$itemsStr
     </channel>
   </rss>` //rescript-lang.org</link>