Corrected some issues with odf documents

1 files changed, 11 insertions, 13 deletions

diff --git a/screen.mli b/screen.mli
index a6a33dc..b5f74b2 100755
--- a/screen.mli
+++ b/screen.mli
@@ -1,31 +1,29 @@
 (** Represent the {!module:Sheet} *)

 

-type screen

+type t

 

-(** Initialise thee screen *)

-val init: unit -> screen

-

-val close: screen -> unit

+(** Run the screen *)

+val run: (t -> 'a) -> 'a

 

 (** {2 Screen updates} *)

 

-val draw: Sheet.t -> screen -> screen

+val draw: Sheet.t -> t -> t

 

-val draw_input: Sheet.t -> screen -> screen

+val draw_input: Sheet.t -> t -> t

 

-val resize: Sheet.t -> screen -> screen 

+val resize: Sheet.t -> t -> t 

 

 (** Display a message in the status bar. *)

-val status: screen -> UTF8.t -> unit

+val status: t -> UTF8.t -> unit

 

 (** {2 User inputs} *)

 

 (** Wait for a keycode *)

-val read_key : screen -> string

+val read_key : t -> string

 (** The keycode is always NULL terminated *)

 

-val search: screen -> UTF8.t

+val search: t -> UTF8.t

 

-val get_cell: screen -> int * int -> (int * int) option

+val get_cell: t -> int * int -> (int * int) option

 

-val editor: ?position: int * int -> ?prefix:UTF8.t -> ?init:UTF8.t -> screen -> UTF8.t option

+val editor: ?position: int * int -> ?prefix:UTF8.t -> ?init:UTF8.t -> t -> UTF8.t option