Mercurial > emacs
comparison src/keyboard.c @ 11993:25aed301d8f7
(Fset_input_mode): When read_socket_hook, ignore
what the user specified, and set interrupt_input in the preferred
way for this system.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Mon, 29 May 1995 19:40:47 +0000 |
parents | 7c2d57ac784f |
children | 4179378fa410 |
comparison
equal
deleted
inserted
replaced
11992:e550e0d13e83 | 11993:25aed301d8f7 |
---|---|
6523 #endif | 6523 #endif |
6524 | 6524 |
6525 reset_sys_modes (); | 6525 reset_sys_modes (); |
6526 #ifdef SIGIO | 6526 #ifdef SIGIO |
6527 /* Note SIGIO has been undef'd if FIONREAD is missing. */ | 6527 /* Note SIGIO has been undef'd if FIONREAD is missing. */ |
6528 if (read_socket_hook) | |
6529 { | |
6530 /* When using X, don't give the user a real choice, | |
6531 because we haven't implemented the mechanisms to support it. */ | |
6528 #ifdef NO_SOCK_SIGIO | 6532 #ifdef NO_SOCK_SIGIO |
6529 if (read_socket_hook) | 6533 interrupt_input = 0; |
6530 interrupt_input = 0; /* No interrupts if reading from a socket. */ | 6534 #else /* not NO_SOCK_SIGIO */ |
6535 interrupt_input = 1; | |
6536 #endif /* NO_SOCK_SIGIO */ | |
6537 } | |
6531 else | 6538 else |
6532 #endif /* NO_SOCK_SIGIO */ | |
6533 interrupt_input = !NILP (interrupt); | 6539 interrupt_input = !NILP (interrupt); |
6534 #else /* not SIGIO */ | 6540 #else /* not SIGIO */ |
6535 interrupt_input = 0; | 6541 interrupt_input = 0; |
6536 #endif /* not SIGIO */ | 6542 #endif /* not SIGIO */ |
6543 | |
6537 /* Our VMS input only works by interrupts, as of now. */ | 6544 /* Our VMS input only works by interrupts, as of now. */ |
6538 #ifdef VMS | 6545 #ifdef VMS |
6539 interrupt_input = 1; | 6546 interrupt_input = 1; |
6540 #endif | 6547 #endif |
6548 | |
6541 flow_control = !NILP (flow); | 6549 flow_control = !NILP (flow); |
6542 if (NILP (meta)) | 6550 if (NILP (meta)) |
6543 meta_key = 0; | 6551 meta_key = 0; |
6544 else if (EQ (meta, Qt)) | 6552 else if (EQ (meta, Qt)) |
6545 meta_key = 1; | 6553 meta_key = 1; |