Update

1 files changed, 2 insertions, 5 deletions

diff --git a/state.ml b/state.ml
index 52fe5a6..5a1ef8f 100755
--- a/state.ml
+++ b/state.ml
@@ -12,9 +12,6 @@ type mode =
   | Selection of int
   | Out
 
-type current = Path.Path_Builder.t
-
-
 (** Events *)
 type canva_events =
   [ `Click of float * float
@@ -41,7 +38,7 @@ type events =
 type state =
   { mode : mode
   ; paths : Path.Fixed.t list
-  ; current : current
+  ; current : Path.Path_Builder.t
   ; width : float
   ; angle : float
   }
@@ -97,7 +94,7 @@ let update_selection id state f =
           | false -> path
           | true -> Path.Fixed.map_point path f
         ) in
-  { state with paths}
+  { state with paths }
 
 let do_action
   : events -> state -> state