fix: package editor didn't debug lexical models

This commit is contained in:
Marc Durdin 2019-12-04 19:00:59 +01:00
parent a5a9a8f35d
commit c6d4d58f2d
2 changed files with 5 additions and 2 deletions

View file

@ -183,7 +183,7 @@ inherited frmPackageEditor: TfrmPackageEditor
Top = 0
Width = 965
Height = 622
ActivePage = pageLexicalModels
ActivePage = pageFiles
Align = alClient
Images = modActionsMain.ilEditorPages
MultiLine = True
@ -1119,6 +1119,9 @@ inherited frmPackageEditor: TfrmPackageEditor
object pageSource: TTabSheet
Caption = 'Source'
ImageIndex = 9
ExplicitLeft = 0
ExplicitWidth = 0
ExplicitHeight = 0
end
object pageCompile: TTabSheet
Caption = 'Compile'

View file

@ -1662,7 +1662,7 @@ var
FHasDesktopTarget, FHasMobileTarget: Boolean;
begin
FHasDesktopTarget := False;
FHasMobileTarget := False;
FHasMobileTarget := pack.LexicalModels.Count > 0;
for k in pack.Keyboards do
begin
for i := 0 to pack.Files.Count - 1 do