… | |
… | |
414 | $CFG->{$k} = $v unless exists $CFG->{$k}; |
414 | $CFG->{$k} = $v unless exists $CFG->{$k}; |
415 | } |
415 | } |
416 | |
416 | |
417 | sdl_init; |
417 | sdl_init; |
418 | |
418 | |
419 | @SDL_MODES = reverse map [SDL::RectW ($_), SDL::RectH ($_)], |
419 | @SDL_MODES = reverse |
|
|
420 | grep $_->[0] >= 640 && $_->[1] >= 480, |
|
|
421 | map [SDL::RectW ($_), SDL::RectH ($_)], |
420 | @{ SDL::ListModes 0, SDL_FULLSCREEN | SDL_HWSURFACE | SDL_OPENGL }; |
422 | @{ SDL::ListModes 0, SDL_FULLSCREEN | SDL_HWSURFACE | SDL_OPENGL }; |
421 | |
423 | |
422 | @SDL_MODES or CFClient::fatal "Unable to find a usable video mode\n(hardware accelerated opengl fullscreen)"; |
424 | @SDL_MODES or CFClient::fatal "Unable to find a usable video mode\n(hardware accelerated opengl fullscreen)"; |
423 | |
425 | |
424 | $CFG->{sdl_mode} = 0 if $CFG->{sdl_mode} > @SDL_MODES; |
426 | $CFG->{sdl_mode} = 0 if $CFG->{sdl_mode} > @SDL_MODES; |
425 | |
427 | |