From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 18 May 1994 05:39:39 +0000 (+0000)
Subject: (syms_of_emacs): EMACS_CONFIGURATION renamed from CONFIGURATION.
X-Git-Tag: emacs-19.34~8315
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f7511647da564db45f45e1e00cef3a98779d1fcf;p=emacs.git

(syms_of_emacs): EMACS_CONFIGURATION renamed from CONFIGURATION.

(shut_down_emacs): Don't call intern.
---

diff --git a/src/emacs.c b/src/emacs.c
index 42aff9fb9d9..784cf183a66 100644
--- a/src/emacs.c
+++ b/src/emacs.c
@@ -850,7 +850,11 @@ shut_down_emacs (sig, no_x, stuff)
 #endif
 
 #ifdef HAVE_X_WINDOWS
-  if (!noninteractive && EQ (Vwindow_system, intern ("x")) && ! no_x)
+  /* It's not safe to call intern here.  Maybe we are crashing.  */
+  if (!noninteractive && SYMBOLP (Vwindow_system)
+      && XSYMBOL (Vwindow_system)->name->size == 1
+      && XSYMBOL (Vwindow_system)->name->data[0] == 'x'
+      && ! no_x)
     Fx_close_current_connection ();
 #endif /* HAVE_X_WINDOWS */
 
@@ -1008,7 +1012,7 @@ syms_of_emacs ()
 
   DEFVAR_LISP ("system-configuration", &Vsystem_configuration,
     "Value is string indicating configuration Emacs was built for.");
-  Vsystem_configuration = build_string (CONFIGURATION);
+  Vsystem_configuration = build_string (EMACS_CONFIGURATION);
 
   DEFVAR_BOOL ("noninteractive", &noninteractive1,
     "Non-nil means Emacs is running without interactive terminal.");