--- deliantra/Deliantra-Client/Client.xs	2006/04/06 15:30:09	1.1
+++ deliantra/Deliantra-Client/Client.xs	2006/04/08 14:04:14	1.4
@@ -2,6 +2,24 @@
 #include "perl.h"
 #include "XSUB.h"
 
+#include <SDL.h>
+#include <SDL_opengl.h>
+#include <SDL_image.h>
+
 MODULE = Crossfire::Client	PACKAGE = Crossfire::Client
 
+char *
+gl_version ()
+	CODE:
+        RETVAL = glGetString (GL_VERSION);
+	OUTPUT:
+        RETVAL
+
+char *
+gl_extensions ()
+	CODE:
+        RETVAL = glGetString (GL_EXTENSIONS);
+	OUTPUT:
+        RETVAL
+