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

git-svn-id: trunk@65203 -
---
 components/turbopower_ipro/iputils.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/components/turbopower_ipro/iputils.pas b/components/turbopower_ipro/iputils.pas
index 4389d31eee..6db1619312 100644
--- a/components/turbopower_ipro/iputils.pas
+++ b/components/turbopower_ipro/iputils.pas
@@ -287,7 +287,7 @@ begin
   Result := Copy(Strng, StrStart, StrEnd - StrStart + 1);
 end;
 
-{ Find leftmost occurence of character C in string S }
+{ Find leftmost occurrence of character C in string S }
 {* If C not found returns 0 }
 function CharPos(C: AnsiChar; const S : string): Integer;
 var
@@ -422,7 +422,7 @@ begin
   Result := i;
 end;
 
-{ Find location of first occurence of a substring (SubStr) in a string (S) }
+{ Find location of first occurrence of a substring (SubStr) in a string (S) }
 { past a particular index (Idx) }
 { * Result is relative to the start of the entire original string }
 { * Returns 0 if substring not found }