tutoreact: Ocsipersist.open_table returns an lwt value

[adrien-n]

In src/tutoreact.wiki, there is the following code:

let db = Ocsipersist.open_table "messages"
[...]
let get_message id = Ocsipersist.find db (string_of_int id)
[...]
let add_message v =
[...]
let%lwt () = Ocsipersist.add db (string_of_int index) v in

However Ocsipersist.open_table returns a value of type 'a Ocsipersist.table Lwt.t while Ocsipersist.find's and Ocsipersist.add's first argument must be of type 'b Ocsipersist.table .

[vasilisp]

The signature of open_table has changed quite recently and the doc is out-of-date. Fixes welcome :).