Browse Source

fcl-passrc: fixed spaces

git-svn-id: trunk@48863 -
Mattias Gaertner 4 years ago
parent
commit
49830232d7
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/fcl-passrc/src/pasuseanalyzer.pas

+ 1 - 1
packages/fcl-passrc/src/pasuseanalyzer.pas

@@ -2854,7 +2854,7 @@ begin
     begin
     // write without read
     if (vmExternal in El.VarModifiers)
-    or (El.ClassType=TPasProperty)
+        or (El.ClassType=TPasProperty)
         or ((El.Parent is TPasClassType) and TPasClassType(El.Parent).IsExternal) then
       exit;
     if El.Visibility in [visPrivate,visStrictPrivate] then