Parcourir la source

Don't show Debug menu for FlashOSes.

git-svn-id: file:///var/svn/tigccpp/trunk/tigcc/ide@681 9552661e-59e3-4036-b4f2-dbe53926924f
kevinkofler il y a 18 ans
Parent
commit
b8f0448a2a
1 fichiers modifiés avec 1 ajouts et 1 suppressions
  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;