Mercurial > hg > xemacs-beta

diff src/device-x.c @ 157:6b37e6ddd302 r20-3b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b5
author cvs
date Mon, 13 Aug 2007 09:40:41 +0200
parents 538048ae2ab8
children 5a88923fcbfe
line wrap: on
line diff
--- a/src/device-x.c	Mon Aug 13 09:39:46 2007 +0200
+++ b/src/device-x.c	Mon Aug 13 09:40:41 2007 +0200
@@ -391,7 +391,8 @@
       Vdefault_x_device = Qnil;
       DEVICE_LOOP_NO_BREAK (devcons, concons)
 	{
-	  if (DEVICE_X_P (XDEVICE (XCAR (devcons))))
+	  if (DEVICE_X_P (XDEVICE (XCAR (devcons))) &&
+	      !EQ (device, XCAR (devcons)))
 	    {
 	      Vdefault_x_device = XCAR (devcons);
 	      goto double_break;