From: Kartik Thakore <thakore.kartik@gmail.com>
Date: Fri, 6 Nov 2009 16:45:14 +0000 (-0500)
Subject: Typo fixes. NULL is a pointer cannot be assinged to integer value.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4bd2d74dee8dd94f84ba89bef509faefe22c08f5;p=sdlgit%2FSDL_perl.git

Typo fixes. NULL is a pointer cannot be assinged to integer value.
---

diff --git a/lib/SDL/WManagement.pm b/lib/SDL/WManagement.pm
index 4814da1..8b7a0a3 100644
--- a/lib/SDL/WManagement.pm
+++ b/lib/SDL/WManagement.pm
@@ -1,8 +1,8 @@
-package SDL::WMangement;
+package SDL::WManagement;
 use strict;
 use warnings;
 require Exporter;
 require DynaLoader;
 our @ISA = qw(Exporter DynaLoader);
-bootstrap SDL::WMangement;
+bootstrap SDL::WManagement;
 1;
diff --git a/src/Core/WManagement.xs b/src/Core/WManagement.xs
index cf882ff..7221de2 100644
--- a/src/Core/WManagement.xs
+++ b/src/Core/WManagement.xs
@@ -20,4 +20,9 @@ Described on the SDL API site.
 
 =cut
 
-
+int
+wmanage_get_WM_info(  )
+	CODE:
+		RETVAL = 1;
+	OUTPUT:
+		RETVAL
diff --git a/src/Core/objects/Event.xs b/src/Core/objects/Event.xs
index 539da64..750a4f9 100644
--- a/src/Core/objects/Event.xs
+++ b/src/Core/objects/Event.xs
@@ -47,7 +47,7 @@ Uint8
 event_type ( event, ... )
 	SDL_Event *event
 	CODE:
-		RETVAL = NULL;
+		RETVAL = -1;
 		if ( &event != NULL ) 
 		RETVAL = event->type;
 	OUTPUT:
@@ -179,7 +179,7 @@ event_quit ( event, ... )
 	PREINIT:
 		char *CLASS = "SDL::QuitEvent";
 	CODE:
-		RETVAL = NULL;
+		RETVALE = NULL;
 		if ( &event != NULL ) 
 		RETVAL = &(event->quit);
 	OUTPUT:
@@ -191,7 +191,7 @@ event_user ( event, ... )
 	PREINIT:
 		char *CLASS = "SDL::UserEvent";
 	CODE:
-		RETVAL = NULL;
+		RETVALE = NULL;
 		if ( &event != NULL ) 
 		RETVAL = &(event->user);
 	OUTPUT:
@@ -203,7 +203,7 @@ event_syswm ( event, ... )
 	PREINIT:
 		char *CLASS = "SDL::SysWMEvent";
 	CODE:
-		RETVAL = NULL;
+		RETVALE = NULL;
 		if ( &event != NULL ) 
 		RETVAL = &(event->syswm);
 	OUTPUT:
diff --git a/typemap b/typemap
index 7eedfbf..bdd4c52 100644
--- a/typemap
+++ b/typemap
@@ -40,6 +40,7 @@ SDL_Palette *		O_OBJECT
 SDL_PixelFormat *	O_OBJECT
 SDL_VideoInfo *		O_OBJECT
 SDL_version *		O_OBJECT
+SDL_SysWMInfo *		O_OBJECT
 SDL_Cursor *		T_PTR
 SDL_AudioSpec *		T_PTR
 SDL_AudioCVT *		T_PTR