sync with ETH Oberon -- 04.06.2000 - fixed bug in EnumBezier.draw: used xy11 as midpoint of Bezier curve instead of xy12

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6743 8c9fc860-2736-0410-a75d-ab315db34111

source/GfxPaths.Mod

@@ -472,7 +472,7 @@ MODULE GfxPaths; (** portable *)	(* eos  *)
 		BEGIN
 			subdiv(0.5, data.x, x1, x2, x, x01, x11, x12, x22, x23);
 			subdiv(0.5, data.y, y1, y2, y, y01, y11, y12, y22, y23);
-			dx := x11 - data.x; dy := y11 - data.y;
+			dx := x12 - data.x; dy := y12 - data.y;
 			ex := x - data.x; ey := y - data.y;
 			cp := dx*ey - dy*ex;
 			IF cp*cp <= f2 * (ex*ex + ey*ey) THEN	(* flat enough *)