# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1219270196 0
# Node ID f188167016d0d405713c6dcf622faacc14824059
# Parent  6271a23dda53d2b95bf28ffa7e139ca291216766
(x_get_foreign_selection): Return nil if desired selection could not
be obtained, instead of signalling an error.

diff -r 6271a23dda53 -r f188167016d0 src/xselect.c
--- a/src/xselect.c	Wed Aug 20 22:09:40 2008 +0000
+++ b/src/xselect.c	Wed Aug 20 22:09:56 2008 +0000
@@ -1471,7 +1471,7 @@
   if (NILP (XCAR (reading_selection_reply)))
     error ("Timed out waiting for reply from selection owner");
   if (EQ (XCAR (reading_selection_reply), Qlambda))
-    error ("No `%s' selection", SDATA (SYMBOL_NAME (selection_symbol)));
+    return Qnil;
 
   /* Otherwise, the selection is waiting for us on the requested property.  */
   return