Fix enter-fullscreen on windows

db4
unknown 2010-04-30 08:06:06 -05:00
parent 242f8490c5
commit c02bb4bd17
1 changed files with 1 additions and 1 deletions

View File

@ -812,7 +812,7 @@ M: windows-ui-backend (ungrab-input) ( handle -- )
f ClipCursor 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 -- )
handle>> hWnd>>