Fix enter-fullscreen on windows
parent
242f8490c5
commit
c02bb4bd17
|
@ -812,7 +812,7 @@ M: windows-ui-backend (ungrab-input) ( handle -- )
|
||||||
f ClipCursor drop
|
f ClipCursor drop
|
||||||
1 ShowCursor drop ;
|
1 ShowCursor drop ;
|
||||||
|
|
||||||
CONSTANT: fullscreen-flags { WS_CAPTION WS_BORDER WS_THICKFRAME }
|
CONSTANT: fullscreen-flags flags{ WS_CAPTION WS_BORDER WS_THICKFRAME }
|
||||||
|
|
||||||
: enter-fullscreen ( world -- )
|
: enter-fullscreen ( world -- )
|
||||||
handle>> hWnd>>
|
handle>> hWnd>>
|
||||||
|
|
Loading…
Reference in New Issue