haz/llpp
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Proper handling of WM initiated full screen switch

Browse source
This commit is contained in:
malc 2013-02-17 00:15:16 +04:00
parent eefaf5f154
commit 633dfcee76
1 changed files with 10 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
wsi.ml
View file

@ -608,11 +608,18 @@ let readresp sock =
let rec loop wsl i = if i = nitems then wsl else
let atom = r32 s (i*4) in
let wsl =
if atom = state.maxhatom then (MaxHorz::wsl)
if atom = state.maxhatom
then MaxHorz::wsl
else (
if atom = state.maxvatom then (MaxVert::wsl)
if atom = state.maxvatom
then MaxVert::wsl
else (
if atom = state.fulsatom then (Fullscreen::wsl) else wsl
if atom = state.fulsatom
then (
state.fs <- Fs (state.x, state.y, state.w, state.h);
Fullscreen::wsl
)
else wsl
)
)
in loop wsl (i+1)