diff options
Diffstat (limited to 'script.ml')
| -rwxr-xr-x | script.ml | 3 | 
1 files changed, 2 insertions, 1 deletions
| @@ -8,6 +8,7 @@ module Point = Draw.Point  module Path = Draw  module Path_Builder = Path.Builder.Make(Point) +module Path_Printer = Path_Builder.Draw(Path.WireFrame)  type mode =    | Edit @@ -199,7 +200,7 @@ let on_change canva mouse_position state =        state.current    in -  let path = Point.get @@ Path_Builder.draw current  in +  let path = Draw.WireFrame.get @@ Path_Printer.draw current  in    stroke context path;  (* | 
