# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 770817349 0
# Node ID 2b4e4a76468b46752a620993a2200d1715091ad5
# Parent  75153e2d5d8535b2129145d3b7cb7098764ec336
(using_x_p): New function.

diff -r 75153e2d5d85 -r 2b4e4a76468b src/xfns.c
--- a/src/xfns.c	Sun Jun 05 11:55:23 1994 +0000
+++ b/src/xfns.c	Sun Jun 05 11:55:49 1994 +0000
@@ -249,6 +249,14 @@
     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.  */