clean code

This commit is contained in:
zapashcanon 2022-12-06 01:00:39 +01:00
parent eda6a2d001
commit 1736a4c905
No known key found for this signature in database
GPG key ID: 8981C3C62D1D28F1
10 changed files with 46 additions and 27 deletions

View file

@ -1,13 +1,13 @@
let () =
let logger = if App.log then Dream.logger else Fun.id in
Dream.run ~port:App.port ~error_handler:(Dream.error_template Template.error)
@@ logger @@ Dream.memory_sessions
Dream.run ~port:App.port @@ logger @@ Dream.memory_sessions
@@ Dream.router
Dream.
[ get "/assets/**" Asset.get
; get "/" Home.get
; get "/login" Login.get
; post "/login" Login.post
; get "logout" Logout.get
; get "/register" Register.get
; post "/register" Register.post
]