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; (* |