Rewarbled
This commit is contained in:
@@ -7,6 +7,10 @@ open Types
|
||||
|
||||
module Program =
|
||||
|
||||
let pipeline = pipeline {
|
||||
use_warbler
|
||||
}
|
||||
|
||||
let router = router {
|
||||
not_found_handler (setStatusCode 404 >=> text "404")
|
||||
get "/" ( (View.index [||]) |> htmlView)
|
||||
|
||||
Reference in New Issue
Block a user