… | |
… | |
2159 | delete $animate_object{$widget}; |
2159 | delete $animate_object{$widget}; |
2160 | } |
2160 | } |
2161 | |
2161 | |
2162 | %SDL_CB = ( |
2162 | %SDL_CB = ( |
2163 | CFPlus::SDL_QUIT => sub { |
2163 | CFPlus::SDL_QUIT => sub { |
2164 | exit; |
2164 | Event::unloop_all; |
2165 | }, |
2165 | }, |
2166 | CFPlus::SDL_VIDEORESIZE => sub { |
2166 | CFPlus::SDL_VIDEORESIZE => sub { |
2167 | }, |
2167 | }, |
2168 | CFPlus::SDL_VIDEOEXPOSE => sub { |
2168 | CFPlus::SDL_VIDEOEXPOSE => sub { |
2169 | CFPlus::UI::full_refresh; |
2169 | CFPlus::UI::full_refresh; |
… | |
… | |
2302 | # } |
2302 | # } |
2303 | # my $t2 = Time::HiRes::time; |
2303 | # my $t2 = Time::HiRes::time; |
2304 | # warn $t2-$t1; |
2304 | # warn $t2-$t1; |
2305 | # } |
2305 | # } |
2306 | |
2306 | |
2307 | $startup_done->(); |
|
|
2308 | |
|
|
2309 | video_init; |
2307 | video_init; |
2310 | audio_init; |
2308 | audio_init; |
2311 | } |
2309 | } |
2312 | |
2310 | |
2313 | show_tip_of_the_day if $CFG->{show_tips}; |
2311 | show_tip_of_the_day if $CFG->{show_tips}; |
|
|
2312 | |
|
|
2313 | Event->idle (cb => sub { |
|
|
2314 | $_[0]->w->cancel; |
|
|
2315 | $startup_done->(); |
|
|
2316 | }); |
2314 | |
2317 | |
2315 | Event::loop; |
2318 | Event::loop; |
2316 | |
2319 | |
2317 | #video_shutdown; |
2320 | #video_shutdown; |
2318 | #audio_shutdown; |
2321 | #audio_shutdown; |