X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=MacOSX%2Flauncher.m;fp=MacOSX%2Flauncher.m;h=59ccff5dbfd9fa46f77221594d1e72e8924b754b;hb=3a32e86d2417c9a8078fd75d3f15d11e6bcefecf;hp=749f6647ac39e3e9fc298bd1ef6cced1beeb3188;hpb=0cdd4aa75f50a27006bf41697f215a940524f63e;p=sdlgit%2FSDL_perl.git

diff --git a/MacOSX/launcher.m b/MacOSX/launcher.m
index 749f664..59ccff5 100644
--- a/MacOSX/launcher.m
+++ b/MacOSX/launcher.m
@@ -186,6 +186,7 @@ main( int argc, char** argv)
 	[NSApp setMainMenu: [[NSMenu alloc] init]];
 	
 	sdlplmain = [[SDLPerlMain alloc] init];
+	[sdlplmain retain];
 	[NSApp setDelegate: sdlplmain];
 
 	[NSApp run];