19 lines
846 B
OCaml
19 lines
846 B
OCaml
module BlogPost = Database.BlogPost
|
|
module type SimpleRender = sig val render : unit -> string end
|
|
val header_template : string
|
|
val footer_template : string
|
|
val replace_sequence : string -> string -> string -> string
|
|
val html_unescape : string -> string
|
|
val not_found_template : string
|
|
val error_template : string
|
|
val render_page : string -> string
|
|
val generate_link : BlogPost.t -> string
|
|
val generate_rss_item : BlogPost.t -> string
|
|
val handle_error : [< Caqti_error.t ] -> Dream.response Lwt.t
|
|
val handle_not_found : unit -> Dream.response Lwt.t
|
|
val render_blog_post : Dream.request -> Dream.response Lwt.t
|
|
val render_blog_index : Dream.request -> Dream.response Lwt.t
|
|
val render_rss_feed : Dream.request -> Dream.response Lwt.t
|
|
val render_simple : (module SimpleRender) -> Dream.response Lwt.t
|
|
val render_index : unit -> Dream.response Lwt.t
|