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