From: Karl Heuer <kwzh@gnu.org>
Date: Sun, 5 Nov 1995 04:40:19 +0000 (+0000)
Subject: (makefile-define-space-face): Don't make face if non-X.
X-Git-Tag: emacs-19.34~2458
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=80e01c1954489383a446de2f68cfa7bc34b39a1c;p=emacs.git

(makefile-define-space-face): Don't make face if non-X.
---

diff --git a/lisp/progmodes/make-mode.el b/lisp/progmodes/make-mode.el
index c40cf7beee9..51e2651fc4b 100644
--- a/lisp/progmodes/make-mode.el
+++ b/lisp/progmodes/make-mode.el
@@ -1,4 +1,4 @@
-;;; makefile.el --- makefile editing commands for Emacs
+;;; make-mode.el --- makefile editing commands for Emacs
 
 ;; Copyright (C) 1992, 1994 Free Software Foundation, Inc.
 
@@ -1362,7 +1362,8 @@ Uses `makefile-use-curly-braces-for-macros-p'."
     (nreverse alist)))
 
 (defun makefile-define-space-face ()
-  (make-face 'makefile-space-face)
+  (if (eq window-system 'x)
+      (make-face 'makefile-space-face))
   (or (face-differs-from-default-p 'makefile-space-face)
       (let* ((params (frame-parameters))
 	     (light-bg (cdr (assq 'background-mode params)))
@@ -1376,4 +1377,4 @@ Uses `makefile-use-curly-braces-for-macros-p'."
 			      "hotpink"))))
 	(set-face-background 'makefile-space-face bg-color))))
 
-;;; makefile.el ends here
+;;; make-mode.el ends here