Преглед на файлове

Don't show Debug menu for FlashOSes.

git-svn-id: file:///var/svn/tigccpp/trunk/tigcc/ide@681 9552661e-59e3-4036-b4f2-dbe53926924f
kevinkofler преди 18 години
родител
ревизия
b8f0448a2a
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      MasterUnit.pas

+ 1 - 1
MasterUnit.pas

@@ -195,7 +195,7 @@ end;
 
 function Runnable: Boolean;
 begin
-	Result := (ProjectTarget <> ptArchive) and (TransferTarget <> ttNone);
+	Result := (ProjectTarget <> ptArchive) and (ProjectTarget <> ptFlashOS) and (TransferTarget <> ttNone);
 end;
 
 function StartsWith(const SubStr: string; var Str: string; CaseSensitive: Boolean; Remove: Boolean): Boolean;