sig
  val path : string list
  val f :
    (string * string) list ->
    unit ->
    (Eliom_registration.browser_content, Eliom_registration.http_service)
    Eliom_registration.kind Lwt.t
end