From 84527bd0a315ce2a18e048c138efc3d73009bf64 Mon Sep 17 00:00:00 2001
From: Rawley <75388349+rawleyfowler@users.noreply.github.com>
Date: Mon, 2 Jan 2023 08:40:20 -0600
Subject: [PATCH] Update rawleydotxyz.ml

---
 rawleydotxyz.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/rawleydotxyz.ml b/rawleydotxyz.ml
index eb9dd0a..a5df9c8 100644
--- a/rawleydotxyz.ml
+++ b/rawleydotxyz.ml
@@ -1,8 +1,8 @@
 open Lwt.Infix
 
-let () = Lwt_main.run @@ Database.create_blog_post_table () >>= function
+let () = Lwt_main.run (Database.create_blog_post_table () >>= function
   | Ok () -> Lwt_io.print "Database initialized successfully.\n"
-  | Error e -> failwith (Caqti_error.show e)
+  | Error e -> failwith (Caqti_error.show e))
 
 let () =
   Dream.run