# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 804293940 0
# Node ID 8ae1d01fe37b04f72fcc2327fe24df3f5be169e8
# Parent  abcf4791a9b0018e3b52015438e57fd918651e50
(edt-emulation-on): Check window-system for x, specifically.

diff -r abcf4791a9b0 -r 8ae1d01fe37b lisp/emulation/edt.el
--- a/lisp/emulation/edt.el	Tue Jun 27 20:12:00 1995 +0000
+++ b/lisp/emulation/edt.el	Tue Jun 27 22:59:00 1995 +0000
@@ -1499,7 +1499,7 @@
           (setq term nil)))
     ;; Override terminal-specific file if running X Windows.  X Windows support
     ;; is handled differently in edt-load-xkeys
-    (if window-system
+    (if (eq window-system 'x)
 	(edt-load-xkeys nil)
       (if (null term)
 	  (error "Unable to load EDT terminal specific file for %s" edt-term)))