comparison src/console.c @ 227:0e522484dd2a r20-5b12

Import from CVS: tag r20-5b12
author cvs
date Mon, 13 Aug 2007 10:12:37 +0200
parents 78f53ef88e17
children 51092a27c943
comparison
equal deleted inserted replaced
226:eea38c7ad7b4 227:0e522484dd2a
1064 struct console *con = decode_console (console); 1064 struct console *con = decode_console (console);
1065 1065
1066 val[0] = Qnil; 1066 val[0] = Qnil;
1067 val[1] = CONSOLE_TTY_P (con) && TTY_FLAGS (con).flow_control ? Qt : Qnil; 1067 val[1] = CONSOLE_TTY_P (con) && TTY_FLAGS (con).flow_control ? Qt : Qnil;
1068 val[2] = (!CONSOLE_TTY_P (con) || TTY_FLAGS (con).meta_key == 1) ? 1068 val[2] = (!CONSOLE_TTY_P (con) || TTY_FLAGS (con).meta_key == 1) ?
1069 Qt : TTY_FLAGS (con).meta_key == 2 ? make_int (0) : Qnil; 1069 Qt : TTY_FLAGS (con).meta_key == 2 ? Qzero : Qnil;
1070 val[3] = make_char (CONSOLE_QUIT_CHAR (con)); 1070 val[3] = make_char (CONSOLE_QUIT_CHAR (con));
1071 1071
1072 return Flist (sizeof (val) / sizeof (val[0]), val); 1072 return Flist (sizeof (val) / sizeof (val[0]), val);
1073 } 1073 }
1074 1074