From c1a767e4ce8bbc0c2fc9d258b45f744594fbbbc4 Mon Sep 17 00:00:00 2001
From: maxim <maxim@lazarus-ide.org>
Date: Thu, 10 Jun 2021 22:13:34 +0000
Subject: [PATCH] SynEdit: fixed typos related to 'occur' word

git-svn-id: trunk@65201 -
---
 components/synedit/synedit.pp        | 8 ++++----
 components/synedit/syneditexport.pas | 2 +-
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/components/synedit/synedit.pp b/components/synedit/synedit.pp
index 71568f5ce7..6aa232312e 100644
--- a/components/synedit/synedit.pp
+++ b/components/synedit/synedit.pp
@@ -3671,26 +3671,26 @@ begin
       exit;
 
     if FLeftGutter.Visible and (X < FLeftGutter.Width) then begin
-      // mouse event occured in Gutter ?
+      // mouse event occurred in Gutter ?
       if FLeftGutter.MaybeHandleMouseAction(Info, @DoHandleMouseAction) then
         exit;
     end
     else
     if FRightGutter.Visible and (X > ClientWidth - FRightGutter.Width) then begin
-      // mouse event occured in Gutter ?
+      // mouse event occurred in Gutter ?
       if FRightGutter.MaybeHandleMouseAction(Info, @DoHandleMouseAction) then
         exit;
     end
     else
     begin
-      // mouse event occured in selected block ?
+      // mouse event occurred in selected block ?
       if SelAvail and (X >= FTextArea.Bounds.Left) and (X < FTextArea.Bounds.Right) and
          (Y >= FTextArea.Bounds.Top) and (Y < FTextArea.Bounds.Bottom) and
          IsPointInSelection(FInternalCaret.LineBytePos)
       then
         if DoHandleMouseAction(FMouseSelActions.GetActionsForOptions(MouseOptions), Info) then
           exit;
-      // mouse event occured in text?
+      // mouse event occurred in text?
       if DoHandleMouseAction(FMouseTextActions.GetActionsForOptions(MouseOptions), Info) then
         exit;
     end;
diff --git a/components/synedit/syneditexport.pas b/components/synedit/syneditexport.pas
index e6b32fd1a8..f33bb61e1f 100644
--- a/components/synedit/syneditexport.pas
+++ b/components/synedit/syneditexport.pas
@@ -58,7 +58,7 @@ uses
 type
   PSynReplaceCharsArray = ^TSynReplaceCharsArray;
   { Array to hold the replacements strings for chars that are invalid for the
-    output format, occurences of the chars that have a corresponding entry in
+    output format, occurrences of the chars that have a corresponding entry in
     this array are replaced with the string the entry points to.  Descendant
     classes have to fill it accordingly. }
   TSynReplaceCharsArray = array[char] of PChar;