Explorar o código

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

Karoly Balogh %!s(int64=3) %!d(string=hai) anos
pai
achega
1f41cd195f
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
  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;