diff --git a/src/include/ZMap/zmapXRemote.h b/src/include/ZMap/zmapXRemote.h
index 94e4ef454b810b0ec45b181189d41a7aa9249dee..c697172b32edadb8429b027b8055885ddc27d057 100755
--- a/src/include/ZMap/zmapXRemote.h
+++ b/src/include/ZMap/zmapXRemote.h
@@ -27,9 +27,9 @@
  *
  * Exported functions: See ZMap/zmapXRemote.h (this file)
  * HISTORY:
- * Last edited: Mar  8 17:17 2007 (rds)
+ * Last edited: Mar  9 10:29 2007 (edgrif)
  * Created: Wed Apr 13 19:02:52 2005 (rds)
- * CVS info:   $Id: zmapXRemote.h,v 1.14 2007-03-09 08:24:56 rds Exp $
+ * CVS info:   $Id: zmapXRemote.h,v 1.15 2007-03-09 10:29:10 edgrif Exp $
  *-------------------------------------------------------------------
  */
 
@@ -48,7 +48,7 @@
 #include <X11/Xatom.h>
 
 /* These are here just to allow checking */
-#define ZMAP_XREMOTE_CURRENT_VERSION      "$Revision: 1.14 $"
+#define ZMAP_XREMOTE_CURRENT_VERSION      "$Revision: 1.15 $"
 #define ZMAP_XREMOTE_CURRENT_VERSION_ATOM "_ZMAP_XREMOTE_VERSION"
 #define ZMAP_XREMOTE_APPLICATION_ATOM     "_ZMAP_XREMOTE_APP"
 
@@ -157,6 +157,7 @@ void zMapXRemoteSetResponseAtomName(zMapXRemoteObj object, char *name); /* Ditto
 void zMapXRemoteSetWindowID(zMapXRemoteObj object, unsigned long window_id); /* Ditto */
 
 char *zMapXRemoteGetResponse(zMapXRemoteObj object);
+Window zMapXRemoteGetWindowID(zMapXRemoteObj object) ;
 
 GdkAtom zMapXRemoteGdkRequestAtom(zMapXRemoteObj object);
 GdkAtom zMapXRemoteGdkResponseAtom(zMapXRemoteObj object);
diff --git a/src/zmapControl/remote/zmapXRemote.c b/src/zmapControl/remote/zmapXRemote.c
index 56b89423d8a5070267d02ccfe71c31431f60beb2..1c83fd982595ff484e8fe21b146e790c075d7a83 100755
--- a/src/zmapControl/remote/zmapXRemote.c
+++ b/src/zmapControl/remote/zmapXRemote.c
@@ -27,9 +27,9 @@
  *
  * Exported functions: See ZMap/zmapXRemote.h
  * HISTORY:
- * Last edited: Mar  9 08:23 2007 (rds)
+ * Last edited: Mar  9 10:28 2007 (edgrif)
  * Created: Wed Apr 13 19:04:48 2005 (rds)
- * CVS info:   $Id: zmapXRemote.c,v 1.21 2007-03-09 08:23:48 rds Exp $
+ * CVS info:   $Id: zmapXRemote.c,v 1.22 2007-03-09 10:29:10 edgrif Exp $
  *-------------------------------------------------------------------
  */
 
@@ -279,13 +279,14 @@ int zMapXRemoteSendRemoteCommand(zMapXRemoteObj object, char *command, char **re
   XSelectInput(object->display, object->window_id, event_mask);
 
   result = zmapXRemoteChangeProperty(object, object->request_atom, command);
-  
+
   zmapXDebug("sent '%s'...\n", command);
 
   while (!isDone && !windowError)
     {
       zmapXDebug("%s"," - while: I'm still waiting...\n");
 
+
       //      if(XPending(dpy))
       XNextEvent (object->display, &event);
 
@@ -451,6 +452,15 @@ void zMapXRemoteResponseSplit(zMapXRemoteObj object, char *full_response, int *c
   return ;
 }
 
+
+/* Get the window id. */
+Window zMapXRemoteGetWindowID(zMapXRemoteObj object)
+{
+  zMapAssert(object) ;
+
+  return object->window_id ;
+}
+
 /*! zMapXRemoteGetResponse 
  * ------------------------
  * Generally for the perl bit so it can get the response.