(using_x_p): New function.

75cc8ee5 · Richard M. Stallman · 588064ce · 75cc8ee5
Commit 75cc8ee5 authored Jun 05, 1994 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 8 additions and 0 deletions

src/xfns.c src/xfns.c +8 -0

No files found.
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -249,6 +249,14 @@ check_x ()
    error ("X windows are not in use or not initialized");
 }

+/* Nonzero if using X for display.  */
+
+int
+using_x_p ()
+{
+  return x_current_display != 0;
+}
+
 /* Return the Emacs frame-object corresponding to an X window.
   It could be the frame's main window or an icon window.  */