ivan/site
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Update rawleydotxyz.ml

Browse Source
This commit is contained in:
Rawley
2023-01-02 08:40:20 -06:00
committed by GitHub
parent 567ea673b7
commit 84527bd0a3
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
rawleydotxyz.ml
View File

@@ -1,8 +1,8 @@
open Lwt.Infix 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" | Ok () -> Lwt_io.print "Database initialized successfully.\n"
| Error e -> failwith (Caqti_error.show e) | Error e -> failwith (Caqti_error.show e))
let () = let () =
Dream.run Dream.run