summaryrefslogtreecommitdiff
path: root/src/xfns.c
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1994-02-14 23:28:23 +0000
committerKarl Heuer <kwzh@gnu.org>1994-02-14 23:28:23 +0000
commit9e3a5f8a4f38989946fbf58ffb1d4d0aee94a39f (patch)
treedd89072bc53c48f5c115597564c28f358cd7a378 /src/xfns.c
parenta91f53b2b7c15af8482b5d112c4030c52377d8de (diff)
downloademacs-9e3a5f8a4f38989946fbf58ffb1d4d0aee94a39f.tar.gz
(Fx_close_current_connection): call check_x.
Diffstat (limited to 'src/xfns.c')
-rw-r--r--src/xfns.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/xfns.c b/src/xfns.c
index e6b6c43a497..0c775d3994f 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -3925,6 +3925,12 @@ DEFUN ("x-close-current-connection", Fx_close_current_connection,
0, 0, 0, "Close the connection to the current X server.")
()
{
+ /* Note: If we're going to call check_x here, then the fatal error
+ can't happen. For the moment, this check is just for safety,
+ so a user won't try out the function and get a crash. If it's
+ really intended only to be called when killing emacs, then there's
+ no reason for it to have a lisp interface at all. */
+ check_x();
#ifdef HAVE_X11
/* This is ONLY used when killing emacs; For switching displays
we'll have to take care of setting CloseDownMode elsewhere. */