From: Kartik Thakore <thakore.kartik@gmail.com>
Date: Tue, 3 Nov 2009 18:38:58 +0000 (-0500)
Subject: [WIP] SDL::SurfacePixel turned on again. Needs to be cleaned up
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b1769478f5c492932b7b47637f4269d6a793fba6;p=sdlgit%2FSDL_perl.git

[WIP] SDL::SurfacePixel turned on again. Needs to be cleaned up
---

diff --git a/src/SDL.xs b/src/SDL.xs
index dff66d1..89de5c6 100644
--- a/src/SDL.xs
+++ b/src/SDL.xs
@@ -1096,17 +1096,13 @@ SurfacePixels ( surface )
 	OUTPUT:
 		RETVAL
 
-=cut
-
-=for comment
-
-Comment out for now as it does not compile
-
 SDL_Color*
 SurfacePixel ( surface, x, y, ... )
 	SDL_Surface *surface
 	Sint32 x
 	Sint32 y
+	PREINIT:
+		char* CLASS = "SDL::Color";
 	CODE:
 		SDL_Color* color;
 		int pix,index;
@@ -1165,6 +1161,7 @@ SurfacePixel ( surface, x, y, ... )
 		}
 	OUTPUT:
 		RETVAL
+=for documenation
 
 int
 MUSTLOCK ( surface )