1package SDL::CDTrack; 2use strict; 3use warnings; 4use vars qw(@ISA @EXPORT @EXPORT_OK); 5require Exporter; 6require DynaLoader; 7use SDL::Constants ':SDL::CDROM'; 8our @ISA = qw(Exporter DynaLoader); 9 10use SDL::Internal::Loader; 11internal_load_dlls(__PACKAGE__); 12 13our $VERSION = 2.548; 14 15bootstrap SDL::CDTrack; 16 17use base 'Exporter'; 18our @EXPORT = @{ $SDL::Constants::EXPORT_TAGS{'SDL::CDROM'} }; 19our %EXPORT_TAGS = ( 20 all => \@EXPORT, 21 format => $SDL::Constants::EXPORT_TAGS{'SDL::CDROM/default'}, 22 status => $SDL::Constants::EXPORT_TAGS{'SDL::CDROM/status'}, 23 track_type => $SDL::Constants::EXPORT_TAGS{'SDL::CDROM/track_type'} 24); 25 261; 27