X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSDL%2FConstants.pm;h=5ed457a05ef96d3d0f3b5f1d55b063ebbdc81ce3;hb=0064136debf6b3e5eea159887367743220a31d20;hp=fedd9d16fbb50e1a8105dd51c8a46544cd1795ec;hpb=7b6a53a1f5064ca5b8ab0243f7bcf6209e6bf5a4;p=sdlgit%2FSDL_perl.git

diff --git a/lib/SDL/Constants.pm b/lib/SDL/Constants.pm
index fedd9d1..5ed457a 100644
--- a/lib/SDL/Constants.pm
+++ b/lib/SDL/Constants.pm
@@ -305,10 +305,7 @@ package SDL::Constants;
 	SDL_SAMPLEFLAG_EAGAIN
 );
 
-for (@EXPORT) {
-	*{"SDL::" . $_} = *{$_};
-	*{"main::" . $_} = *{$_};
-}
+@ISA = qw(Exporter);
 
 sub AUDIO_S16 {32784}
 sub AUDIO_S16MSB {36880}