Mercurial > hg > xemacs-beta

comparison 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
comparison
equal deleted inserted replaced
156:60baf0b43294 157:6b37e6ddd302
389 Lisp_Object devcons, concons; 389 Lisp_Object devcons, concons;
390 /* #### handle deleting last X device */ 390 /* #### handle deleting last X device */
391 Vdefault_x_device = Qnil; 391 Vdefault_x_device = Qnil;
392 DEVICE_LOOP_NO_BREAK (devcons, concons) 392 DEVICE_LOOP_NO_BREAK (devcons, concons)
393 { 393 {
394 if (DEVICE_X_P (XDEVICE (XCAR (devcons)))) 394 if (DEVICE_X_P (XDEVICE (XCAR (devcons))) &&
395 !EQ (device, XCAR (devcons)))
395 { 396 {
396 Vdefault_x_device = XCAR (devcons); 397 Vdefault_x_device = XCAR (devcons);
397 goto double_break; 398 goto double_break;
398 } 399 }
399 } 400 }