From 11ea7e7e46f75601aa49c5881da3343733c77a32 Mon Sep 17 00:00:00 2001
From: n7800 <14154601-n7800@users.noreply.gitlab.com>
Date: Fri, 13 Dec 2024 07:15:29 +0500
Subject: [PATCH] IDE/SourceEditor: Fix a typo in the type name
 TSynHighlighterLazCustumPasAttribute

---
 ide/editoroptions.pp    | 12 ++++++------
 ide/sourcesyneditor.pas | 28 ++++++++++++++--------------
 2 files changed, 20 insertions(+), 20 deletions(-)

diff --git a/ide/editoroptions.pp b/ide/editoroptions.pp
index c95b8c994a..11b16ec68a 100644
--- a/ide/editoroptions.pp
+++ b/ide/editoroptions.pp
@@ -324,7 +324,7 @@ type
 
   { TColorSchemeAttribute }
 
-  TColorSchemeAttribute = class(TSynHighlighterLazCustumPasAttribute)
+  TColorSchemeAttribute = class(TSynHighlighterLazCustomPasAttribute)
   private
     FFeatures: TColorSchemeAttributeFeatures;
     FGroup: TAhaGroupName;
@@ -7053,9 +7053,9 @@ begin
       TSynHighlighterAttributesModifier(aDest).ForeAlpha := Src.ForeAlpha;
       TSynHighlighterAttributesModifier(aDest).BackAlpha := Src.BackAlpha;
       TSynHighlighterAttributesModifier(aDest).FrameAlpha := Src.FrameAlpha;
-      if aDest is TSynHighlighterLazCustumPasAttribute then begin
-        TSynHighlighterLazCustumPasAttribute(aDest).CustomWords.Assign(CustomWords);
-        TSynHighlighterLazCustumPasAttribute(aDest).CustomWordTokenKind := CustomWordTokenKind;
+      if aDest is TSynHighlighterLazCustomPasAttribute then begin
+        TSynHighlighterLazCustomPasAttribute(aDest).CustomWords.Assign(CustomWords);
+        TSynHighlighterLazCustomPasAttribute(aDest).CustomWordTokenKind := CustomWordTokenKind;
       end;
     end;
 
@@ -7098,7 +7098,7 @@ begin
   inherited Assign(Src);
   FFeatures := [hafBackColor, hafForeColor, hafFrameColor,
                 hafStyle, hafFrameStyle, hafFrameEdges, hafPrior];
-  if Src is TSynHighlighterLazCustumPasAttribute then
+  if Src is TSynHighlighterLazCustomPasAttribute then
     FFeatures := FFeatures + [hafCustomWords];
   if Src is TSynHighlighterAttributesModifier then
     FFeatures := FFeatures + [hafAlpha, hafStyleMask];
@@ -7338,7 +7338,7 @@ begin
       csa.Assign(hla);
       csa.Group := agnLanguage;
       if (FHighlighter <> nil) and (FHighlighter is TNonSrcIDEHighlighter) then
-        if hla is TSynHighlighterLazCustumPasAttribute then
+        if hla is TSynHighlighterLazCustomPasAttribute then
           csa.Features := [hafBackColor, hafForeColor, hafFrameColor, hafAlpha, hafPrior, hafStyle, hafStyleMask, hafCustomWords]
         else
         if hla is TSynHighlighterAttributesModifier then
diff --git a/ide/sourcesyneditor.pas b/ide/sourcesyneditor.pas
index 0a302b1460..2b7bafd350 100644
--- a/ide/sourcesyneditor.pas
+++ b/ide/sourcesyneditor.pas
@@ -339,9 +339,9 @@ type
     FInitializationLine, FFinalizationLine: Integer;
   end;
 
-  { TSynHighlighterLazCustumPasAttribute }
+  { TSynHighlighterLazCustomPasAttribute }
 
-  TSynHighlighterLazCustumPasAttribute = class(TSynHighlighterAttributesModifier)
+  TSynHighlighterLazCustomPasAttribute = class(TSynHighlighterAttributesModifier)
   private
     FCustomWords: TStrings;
     FCustomWordTokenKind: TtkTokenKind;
@@ -362,7 +362,7 @@ type
 
   TIDESynPasSyn = class(TSynPasSyn)
   private
-    FCustomAttribs: array[0..9] of TSynHighlighterLazCustumPasAttribute;
+    FCustomAttribs: array[0..9] of TSynHighlighterLazCustomPasAttribute;
 
     procedure DoBuildCustomPasAttr(Sender: TObject);
     function GetFinalizationLine: Integer;
@@ -2009,26 +2009,26 @@ begin
 end;
 {$ENDIF}
 
-{ TSynHighlighterLazCustumPasAttribute }
+{ TSynHighlighterLazCustomPasAttribute }
 
-procedure TSynHighlighterLazCustumPasAttribute.SetCustomWordTokenKind(AValue: TtkTokenKind);
+procedure TSynHighlighterLazCustomPasAttribute.SetCustomWordTokenKind(AValue: TtkTokenKind);
 begin
   if FCustomWordTokenKind = AValue then Exit;
   FCustomWordTokenKind := AValue;
   Changed;
 end;
 
-procedure TSynHighlighterLazCustumPasAttribute.DoWordsChanged(Sender: TObject);
+procedure TSynHighlighterLazCustomPasAttribute.DoWordsChanged(Sender: TObject);
 begin
   Changed;
 end;
 
-procedure TSynHighlighterLazCustumPasAttribute.AssignFrom(Src: TLazSynCustomTextAttributes);
+procedure TSynHighlighterLazCustomPasAttribute.AssignFrom(Src: TLazSynCustomTextAttributes);
 begin
   inherited AssignFrom(Src);
-  if Src is TSynHighlighterLazCustumPasAttribute then begin
-    FCustomWords.Assign(TSynHighlighterLazCustumPasAttribute(Src).FCustomWords);
-    FCustomWordTokenKind := TSynHighlighterLazCustumPasAttribute(Src).FCustomWordTokenKind;
+  if Src is TSynHighlighterLazCustomPasAttribute then begin
+    FCustomWords.Assign(TSynHighlighterLazCustomPasAttribute(Src).FCustomWords);
+    FCustomWordTokenKind := TSynHighlighterLazCustomPasAttribute(Src).FCustomWordTokenKind;
   end
   else begin
     FCustomWords.Clear;
@@ -2036,7 +2036,7 @@ begin
   end;
 end;
 
-procedure TSynHighlighterLazCustumPasAttribute.DoClear;
+procedure TSynHighlighterLazCustomPasAttribute.DoClear;
 begin
   inherited DoClear;
   if FCustomWords <> nil then
@@ -2044,7 +2044,7 @@ begin
   FCustomWordTokenKind := tkIdentifier;
 end;
 
-procedure TSynHighlighterLazCustumPasAttribute.Init;
+procedure TSynHighlighterLazCustomPasAttribute.Init;
 begin
   FCustomWords := TStringList.Create;
   FCustomWordTokenKind := tkIdentifier;
@@ -2052,7 +2052,7 @@ begin
   inherited Init;
 end;
 
-destructor TSynHighlighterLazCustumPasAttribute.Destroy;
+destructor TSynHighlighterLazCustomPasAttribute.Destroy;
 begin
   inherited Destroy;
   FCustomWords.Destroy;
@@ -2141,7 +2141,7 @@ begin
   inherited Create(AOwner);
 
   for i := 0 to 9 do begin
-    FCustomAttribs[i] := TSynHighlighterLazCustumPasAttribute.Create('Custom '+IntToStr(i), 'CustomToken_'+IntToStr(i));
+    FCustomAttribs[i] := TSynHighlighterLazCustomPasAttribute.Create('Custom '+IntToStr(i), 'CustomToken_'+IntToStr(i));
     AddAttribute(FCustomAttribs[i]);
     FCustomAttribs[i].OnChange := @DoBuildCustomPasAttr;
   end;