Просмотр исходного кода

* Fixed TTarget.HaveOptions

git-svn-id: trunk@13224 -
michael 16 лет назад
Родитель
Сommit
38be92f20e
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      packages/fpmkunit/src/fpmkunit.pp

+ 1 - 1
packages/fpmkunit/src/fpmkunit.pp

@@ -4596,7 +4596,7 @@ end;
 
 function TTarget.HaveOptions: Boolean;
 begin
-
+  Result:=(FOptions<>Nil);
 end;