From 7772e660eb216bc38b0b70a7c4d2624d9cf2a99c Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Wed, 30 Mar 1994 01:02:01 +0000 Subject: [PATCH] Check for existence of windowing system. --- lisp/font-lock.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/font-lock.el b/lisp/font-lock.el index eedb805c9bb..e2499856f43 100644 --- a/lisp/font-lock.el +++ b/lisp/font-lock.el @@ -54,6 +54,9 @@ ;;; Code: +(or window-system + (error "Can't fontify on an ASCII terminal")) + (or (internal-find-face 'underline) (copy-face 'default 'underline)) (set-face-underline-p 'underline t) -- 2.39.5