1 files changed, 17 insertions, 0 deletions
diff --git a/dix/devices.c b/dix/devices.c
index 05a03b572..6c177863c 100644
--- a/dix/devices.c
+++ b/dix/devices.c
@@ -2030,6 +2030,23 @@ GetPairedPointer(DeviceIntPtr kbd)
     return inputInfo.pointer;
 }
 
+/* Find the keyboard device that is paired with the given pointer. If none is
+ * found, return NULL.
+ */
+_X_EXPORT DeviceIntPtr
+GetPairedKeyboard(DeviceIntPtr ptr)
+{
+    DeviceIntPtr dev = inputInfo.devices;
+
+    while(dev)
+    {
+        if (ptr->pSprite == dev->pSprite)
+            return dev;
+        dev = dev->next;
+    }
+    return dev;
+}
+
 /*
  * Register a client to be able to pair devices. 
  */