--- deliantra/Deliantra-Client/Client.xs	2006/05/22 03:28:54	1.91
+++ deliantra/Deliantra-Client/Client.xs	2006/05/23 18:57:35	1.94
@@ -488,6 +488,9 @@
 void
 SDL_GL_SwapBuffers ()
 
+char *
+SDL_GetKeyName (int sym)
+
 void
 SDL_PollEvent ()
 	PPCODE:
@@ -515,6 +518,8 @@
                   break;
 
                 case SDL_MOUSEMOTION:
+                  hv_store (hv, "mod",    3, newSViv (SDL_GetModState ()), 0);
+
                   hv_store (hv, "state",  5, newSViv (ev.motion.state), 0);
                   hv_store (hv, "x",      1, newSViv (ev.motion.x), 0);
                   hv_store (hv, "y",      1, newSViv (ev.motion.y), 0);
@@ -524,6 +529,8 @@
 
                 case SDL_MOUSEBUTTONDOWN:
                 case SDL_MOUSEBUTTONUP:
+                  hv_store (hv, "mod",    3, newSViv (SDL_GetModState ()), 0);
+
                   hv_store (hv, "button", 6, newSViv (ev.button.button), 0);
                   hv_store (hv, "state",  5, newSViv (ev.button.state), 0);
                   hv_store (hv, "x",      1, newSViv (ev.button.x), 0);
@@ -561,6 +568,13 @@
 #endif
 
 char *
+gl_vendor ()
+	CODE:
+        RETVAL = (char *)glGetString (GL_VENDOR);
+	OUTPUT:
+        RETVAL
+
+char *
 gl_version ()
 	CODE:
         RETVAL = (char *)glGetString (GL_VERSION);