From 196542533e0ba6e894ce79837dcc13e9b8db1586 Mon Sep 17 00:00:00 2001
From: Dylan Thinnes <dylan.thinnes@protonmail.com>
Date: Thu, 20 Jun 2024 19:19:04 +0100
Subject: [PATCH] more lint

---
 message-index/site.hs | 15 +++++++--------
 1 file changed, 7 insertions(+), 8 deletions(-)

diff --git a/message-index/site.hs b/message-index/site.hs
index 4dae14a..422b059 100644
--- a/message-index/site.hs
+++ b/message-index/site.hs
@@ -156,9 +156,9 @@ main = hakyll $ do
                     other -> error "is not an example"
             pure $
               JSON.object
-                [ "name" .= name
-                , "route" .= route
-                , "metadata" .= meta
+                [ "name" .= name,
+                  "route" .= route,
+                  "metadata" .= meta
                 ]
 
       let errorItemToJSON :: Item String -> Compiler JSON.Value
@@ -173,17 +173,16 @@ main = hakyll $ do
             examples <- traverse exampleItemToJSON exampleItems
             pure $
               JSON.object
-                [ "code" .= code
-                , "route" .= route
-                , "metadata" .= meta
-                , "examples" .= examples
+                [ "code" .= code,
+                  "route" .= route,
+                  "metadata" .= meta,
+                  "examples" .= examples
                 ]
 
       errorItems <- loadAll $ "messages/*/index.md" .&&. hasNoVersion
       encoded <- traverse errorItemToJSON errorItems
       makeItem $ JSON.encode encoded
 
-
 --------------------------------------------------------------------------------
 
 -- | The file extensions to be shown in example lists