From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 5 Jun 1994 11:55:49 +0000 (+0000)
Subject: (using_x_p): New function.
X-Git-Tag: emacs-19.34~8062
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=75cc8ee527b1d406cba964413f7d10ecfedd8716;p=emacs.git

(using_x_p): New function.
---

diff --git a/src/xfns.c b/src/xfns.c
index 1693807e9f0..4e3144e5dc4 100644
--- 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.  */