… | |
… | |
2213 | CFPlus::SDL_VIDEOEXPOSE => sub { |
2213 | CFPlus::SDL_VIDEOEXPOSE => sub { |
2214 | CFPlus::UI::full_refresh; |
2214 | CFPlus::UI::full_refresh; |
2215 | }, |
2215 | }, |
2216 | CFPlus::SDL_ACTIVEEVENT => sub { |
2216 | CFPlus::SDL_ACTIVEEVENT => sub { |
2217 | # not useful, as APPACTIVE include sonly iconified state, not unmapped |
2217 | # not useful, as APPACTIVE include sonly iconified state, not unmapped |
2218 | # printf "active %x %x\n", $_[0]{gain}, $_[0]{state};#d# |
2218 | # printf "active %x %x %x\n", $_[0]{gain}, $_[0]{state}, CFPlus::SDL_GetAppState;#d# |
|
|
2219 | # printf "a %x\n", CFPlus::SDL_GetAppState & CFPlus::SDL_APPACTIVE;#d# |
2219 | # printf "A\n" if $_[0]{state} & CFPlus::SDL_APPACTIVE; |
2220 | # printf "A\n" if $_[0]{state} & CFPlus::SDL_APPACTIVE; |
2220 | # printf "K\n" if $_[0]{state} & CFPlus::SDL_APPINPUTFOCUS; |
2221 | # printf "K\n" if $_[0]{state} & CFPlus::SDL_APPINPUTFOCUS; |
2221 | # printf "M\n" if $_[0]{state} & CFPlus::SDL_APPMOUSEFOCUS; |
2222 | # printf "M\n" if $_[0]{state} & CFPlus::SDL_APPMOUSEFOCUS; |
2222 | }, |
2223 | }, |
2223 | CFPlus::SDL_KEYDOWN => sub { |
2224 | CFPlus::SDL_KEYDOWN => sub { |