Browse Source

amunits: added missing WA_Activate handling to the OpenWindow taglist handling legacy support code

Karoly Balogh 3 years ago
parent
commit
1f41cd195f
1 changed files with 1 additions and 0 deletions
  1. 1 0
      packages/amunits/src/coreunits/intuition.pas

+ 1 - 0
packages/amunits/src/coreunits/intuition.pas

@@ -4413,6 +4413,7 @@ begin
       WA_SizeBRight: NewWindow^.Flags := NewWindow^.Flags or WFLG_SIZEBRIGHT;
       WA_SizeGadget: NewWindow^.Flags := NewWindow^.Flags or WFLG_SIZEGADGET;
       WA_SmartRefresh: NewWindow^.Flags := NewWindow^.Flags or WFLG_SMART_REFRESH;
+      WA_Activate: NewWindow^.Flags := NewWindow^.Flags or WFLG_ACTIVATE;
       WA_SuperBitMap: NewWindow^.BitMap := Pointer(TagList^.ti_Data);
       WA_Title: NewWindow^.Title := PChar(TagList^.ti_Data);
       WA_Top: NewWindow^.TopEdge := TagList^.ti_Data;