xselect.c.patch

--- a/src/xselect.c
+++ b/src/xselect.c
@@ -1194,7 +1194,7 @@ x_get_foreign_selection (Lisp_Object selection_symbol, Lisp_Object target_type,
   unblock_input ();

   /* This allows quits.  Also, don't wait forever.  */
-  timeout = max (0, x_selection_timeout);
+  /*timeout = max (0, x_selection_timeout);
   secs = timeout / 1000;
   nsecs = (timeout % 1000) * 1000000;
   TRACE1 ("  Start waiting %"pI"d secs for SelectionNotify", secs);
@@ -1205,7 +1205,7 @@ x_get_foreign_selection (Lisp_Object selection_symbol, Lisp_Object target_type,
   if (NILP (XCAR (reading_selection_reply)))
     error ("Timed out waiting for reply from selection owner");
   if (EQ (XCAR (reading_selection_reply), Qlambda))
-    return Qnil;
+    return Qnil;*/

   /* Otherwise, the selection is waiting for us on the requested property.  */
   return