editor/actions/load_page.ml


1
2
3
4
5
6
7
8
9
10

module M = struct

  type t = Jstr.t option

  let process
    : t -> State.t -> State.t
    = fun page_id state ->
      State.load_page page_id state

end