package SDL::Config;

my $sdl_config; 
$sdl_config = {
                'OpenGL' => {
                              'GL' => 1,
                              'SDL' => 1,
                              'GLU' => 1
                            },
                'SDL' => {
                           'png' => 1,
                           'SDL' => 1,
                           'SDL_ttf' => 1,
                           'SDL_net' => 1,
                           'SDL_image' => 1,
                           'SDL_gfx' => 1,
                           'jpeg' => 1,
                           'smpeg' => 1,
                           'SDL_mixer' => 1
                         },
                'SFont' => {
                             'SDL_image' => 1,
                             'SDL' => 1
                           }
              };

sub has
{
	my ($class, $define) = @_;
	scalar grep { $$sdl_config{$_}{$define} } keys %$sdl_config;
}

1;
