Mercurial > hg > xemacs-beta

comparison src/events.c @ 261:405dd6d1825b r20-5b29

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b29
author cvs
date Mon, 13 Aug 2007 10:23:51 +0200
parents 11cf20601dec
children 727739f917cb
comparison
equal deleted inserted replaced
260:052205f7dd5f 261:405dd6d1825b
998 { 998 {
999 case 'I': k = QKtab; m &= ~MOD_CONTROL; break; 999 case 'I': k = QKtab; m &= ~MOD_CONTROL; break;
1000 case 'J': k = QKlinefeed; m &= ~MOD_CONTROL; break; 1000 case 'J': k = QKlinefeed; m &= ~MOD_CONTROL; break;
1001 case 'M': k = QKreturn; m &= ~MOD_CONTROL; break; 1001 case 'M': k = QKreturn; m &= ~MOD_CONTROL; break;
1002 case '[': k = QKescape; m &= ~MOD_CONTROL; break; 1002 case '[': k = QKescape; m &= ~MOD_CONTROL; break;
1003 #ifdef HAVE_TTY
1003 default: 1004 default:
1004 if (c - '@' == XCHAR(con->tty_erase_char)) { 1005 if (CHARP (con->tty_erase_char) &&
1006 c - '@' == XCHAR (con->tty_erase_char)) {
1005 k = QKbackspace; 1007 k = QKbackspace;
1006 m &= ~MOD_CONTROL; 1008 m &= ~MOD_CONTROL;
1007 } 1009 }
1008 break; 1010 break;
1011 #endif
1009 } 1012 }
1010 if (c >= 'A' && c <= 'Z') c -= 'A'-'a'; 1013 if (c >= 'A' && c <= 'Z') c -= 'A'-'a';
1011 } 1014 }
1012 else if (c == XCHAR(con->tty_erase_char)) 1015 #ifdef HAVE_TTY
1016 else if (CHARP (con->tty_erase_char) &&
1017 c == XCHAR(con->tty_erase_char))
1013 k = QKbackspace; 1018 k = QKbackspace;
1019 #endif
1014 else if (c == 127) 1020 else if (c == 127)
1015 k = QKdelete; 1021 k = QKdelete;
1016 else if (c == ' ') 1022 else if (c == ' ')
1017 k = QKspace; 1023 k = QKspace;
1018 1024