Browse Source

* Correct typo

git-svn-id: trunk@44181 -
michael 5 years ago
parent
commit
e47378b5d0
1 changed files with 4 additions and 4 deletions
  1. 4 4
      packages/regexpr/src/regexpr.pas

+ 4 - 4
packages/regexpr/src/regexpr.pas

@@ -280,7 +280,7 @@ type
     {$IFDEF UnicodeWordDetection}
     FUseUnicodeWordDetection: boolean;
     {$ENDIF}
-    FEmptyImputRaisesError : Boolean;
+    FEmptyInputRaisesError : Boolean;
     
     CharCheckers: TRegExprCharCheckerArray;
     CharCheckerInfos: TRegExprCharCheckerInfos;
@@ -619,7 +619,7 @@ type
     property SlowChecksSizeMax: integer read fSlowChecksSizeMax write fSlowChecksSizeMax;
 
      // Raise error when input string is empty
-    Property EmptyImputRaisesError : Boolean Read FEmptyImputRaisesError Write FEmptyImputRaisesError;
+    Property EmptyInputRaisesError : Boolean Read FEmptyInputRaisesError Write FEmptyInputRaisesError;
   end;
 
 type
@@ -4180,7 +4180,7 @@ begin
   // Check InputString presence
   if fInputString = '' then
   begin
-    if EmptyImputRaisesError then
+    if EmptyInputRaisesError then
       Error(reeNoInputStringSpecified);
     Exit;
   end;
@@ -4394,7 +4394,7 @@ begin
     Exit;
   if fInputString = '' then
   begin
-    if EmptyImputRaisesError then
+    if EmptyInputRaisesError then
       Error(reeNoInputStringSpecified);
     Exit;
   end;