comparison src/xfns.c @ 5950:27e4e703f089

(Fx_close_current_connection): call check_x.

5949:f394f25efb3c

DEFUN ("x-close-current-connection", Fx_close_current_connection,
       Sx_close_current_connection,
       0, 0, 0, "Close the connection to the current X server.")
  ()
{
#ifdef HAVE_X11
  /* This is ONLY used when killing emacs;  For switching displays
     we'll have to take care of setting CloseDownMode elsewhere. */

  if (x_current_display)

5950:27e4e703f089

DEFUN ("x-close-current-connection", Fx_close_current_connection,
       Sx_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. */

  if (x_current_display)