comparison lisp/term.el @ 25299:8df4e1dd92d7

(toplevel): Make face `term-default' an empty face. The code relied on the fact that Emacs ignored invalid faces in face text properties in 20.4.
author Gerd Moellmann <gerd@gnu.org>
date Tue, 17 Aug 1999 00:37:45 +0000
parents bfa093996074
children 6ac0cc90d397
comparison
equal deleted inserted replaced
25298:866b59632531 25299:8df4e1dd92d7
717 (defvar term-default-fg-color nil) 717 (defvar term-default-fg-color nil)
718 (defvar term-default-bg-color nil) 718 (defvar term-default-bg-color nil)
719 719
720 (when (fboundp 'make-face) 720 (when (fboundp 'make-face)
721 ;;; --- Simple faces --- 721 ;;; --- Simple faces ---
722 (copy-face 'default 'term-default)
722 (make-face 'term-default-fg) 723 (make-face 'term-default-fg)
723 (make-face 'term-default-bg) 724 (make-face 'term-default-bg)
724 (make-face 'term-default-fg-inv) 725 (make-face 'term-default-fg-inv)
725 (make-face 'term-default-bg-inv) 726 (make-face 'term-default-bg-inv)
726 (make-face 'term-bold) 727 (make-face 'term-bold)