Mercurial > emacs
diff lisp/font-lock.el @ 6578:de72ddd5a3c0
Check for existence of windowing system.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Wed, 30 Mar 1994 01:02:01 +0000 |
| parents | d960f0463014 |
| children | aa83a7152b11 |
line wrap: on
line diff
--- a/lisp/font-lock.el Wed Mar 30 00:50:02 1994 +0000 +++ b/lisp/font-lock.el Wed Mar 30 01:02:01 1994 +0000 @@ -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)