fix after type renaming (#901)

AngusJohnson · Oct 14, 2024 · ed98928 · ed98928
1 parent 2b665ac
commit ed98928
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Delphi/Clipper2Lib/Clipper.Engine.pas b/Delphi/Clipper2Lib/Clipper.Engine.pas
@@ -2842,7 +2842,7 @@ procedure TClipperBase.ExecuteInternal(clipType: TClipType;
   Y: Int64;
   e: PActive;
 begin
-  if clipType = ctNone then Exit;
+  if clipType = ctNoClip then Exit;
   FFillRule := fillRule;
   FClipType := clipType;
   Reset;