From ed98928c66707988d4eb2c49a31c41380a08931c Mon Sep 17 00:00:00 2001
From: zed <zedxxx@users.noreply.github.com>
Date: Mon, 14 Oct 2024 22:05:53 +0300
Subject: [PATCH] fix after type renaming (#901)

---
 Delphi/Clipper2Lib/Clipper.Engine.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Delphi/Clipper2Lib/Clipper.Engine.pas b/Delphi/Clipper2Lib/Clipper.Engine.pas
index 950e847c..56863818 100644
--- 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;