1 files changed, 2 insertions, 3 deletions
diff --git a/main.ml b/main.ml
index e91a9f5..9ecdf84 100755
--- a/main.ml
+++ b/main.ml
@@ -216,8 +216,7 @@ and command (t, screen) action = begin
       Odf.save t.Sheet.data file;
       normal_mode @@ redraw t screen
   | ("enew", _) -> (* Start a new spreadsheet *)
-      let sheet = Sheet.Raw.create in
-      normal_mode @@ redraw (Sheet.create sheet) screen
+      normal_mode @@ redraw (Sheet.create Sheet.Raw.empty) screen
   | ("q", _) ->  (* Quit *)
       t
   | _ -> normal_mode @@ redraw t screen
@@ -227,7 +226,7 @@ let () = begin
 
   let sheet =
     if Array.length Sys.argv = 1 then
-      Sheet.Raw.create
+      Sheet.Raw.empty
     else
       Odf.load Sys.argv.(1) in