--- deliantra/Deliantra-Client/Client.xs	2006/05/23 17:30:18	1.92
+++ 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);