projects
/
chise
/
xemacs-chise.git.1
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Contents in release-21-2 at 1999-06-30-19.
[chise/xemacs-chise.git.1]
/
src
/
console.c
diff --git
a/src/console.c
b/src/console.c
index
7e27f86
..
2b4c637
100644
(file)
--- a/
src/console.c
+++ b/
src/console.c
@@
-781,6
+781,14
@@
the toolbar, glyphs, etc.
return !EQ (type, Qtty) && !EQ (type, Qstream) ? Qt : Qnil;
}
return !EQ (type, Qtty) && !EQ (type, Qstream) ? Qt : Qnil;
}
+DEFUN ("console-features", Fconsole_features, 0, 1, 0, /*
+Return a list of console-specific features.
+*/
+ (console))
+{
+ return CONSOLE_FEATURES (decode_console (console));
+}
+
\f
/**********************************************************************/
\f
/**********************************************************************/
@@
-1079,6
+1087,7
@@
syms_of_console (void)
DEFSUBR (Fconsole_enable_input);
DEFSUBR (Fconsole_disable_input);
DEFSUBR (Fconsole_on_window_system_p);
DEFSUBR (Fconsole_enable_input);
DEFSUBR (Fconsole_disable_input);
DEFSUBR (Fconsole_on_window_system_p);
+ DEFSUBR (Fconsole_features);
DEFSUBR (Fsuspend_console);
DEFSUBR (Fresume_console);
DEFSUBR (Fsuspend_console);
DEFSUBR (Fresume_console);