Mercurial > hg > xemacs-beta
comparison src/device.c @ 373:6240c7796c7a r21-2b2
Import from CVS: tag r21-2b2
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:04:06 +0200 |
parents | 558f606b08ae |
children | 8626e4521993 |
comparison
equal
deleted
inserted
replaced
372:49e1ed2d7ed8 | 373:6240c7796c7a |
---|---|
815 an enqueued magic-eval event. */ | 815 an enqueued magic-eval event. */ |
816 | 816 |
817 void | 817 void |
818 io_error_delete_device (Lisp_Object device) | 818 io_error_delete_device (Lisp_Object device) |
819 { | 819 { |
820 /* Note: it's the console that should get deleted, but | |
821 delete_device_internal() contains a hack that also deletes the | |
822 console when called from this function. */ | |
820 delete_device_internal (XDEVICE (device), 1, 0, 1); | 823 delete_device_internal (XDEVICE (device), 1, 0, 1); |
821 } | 824 } |
822 | 825 |
823 DEFUN ("delete-device", Fdelete_device, 1, 2, 0, /* | 826 DEFUN ("delete-device", Fdelete_device, 1, 2, 0, /* |
824 Delete DEVICE, permanently eliminating it from use. | 827 Delete DEVICE, permanently eliminating it from use. |