From 6b2502a96e7b8ba4b7d5fecca0f9ba18c99af86c Mon Sep 17 00:00:00 2001
From: Martin <laz.git@mfriebe.de>
Date: Tue, 11 Mar 2025 10:26:51 +0100
Subject: [PATCH] SynEdit: fix OnClearMark, checking the correct fields for
 assigned. Issue #41522

(cherry picked from commit 6c2a52efe0d8fcb88cd2b90861782049d3fc3198)
---
 components/synedit/synedit.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/synedit/synedit.pp b/components/synedit/synedit.pp
index 6f8d7d997e..b67e29ad38 100644
--- a/components/synedit/synedit.pp
+++ b/components/synedit/synedit.pp
@@ -7828,7 +7828,7 @@ begin
   end;
   if (smcrRemoved in Changes) and Sender.IsBookmark then begin
     FBookMarks[Sender.BookmarkNumber] := nil;
-    if Assigned(FOnPlaceMark) then
+    if Assigned(FOnClearMark) then
       FOnClearMark(Self, Sender);
   end;