Mercurial > emacs
comparison lisp/faces.el @ 33447:45961172564e
(face-spec-set-match-display): Revert the change from
2000-10-24. Add a FIXME for after v21.1.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Mon, 13 Nov 2000 15:01:48 +0000 |
parents | 21ac2c51ac59 |
children | 900ca3da6e01 |
comparison
equal
deleted
inserted
replaced
33446:e82b52295dfb | 33447:45961172564e |
---|---|
1144 conjuncts (cdr conjuncts) | 1144 conjuncts (cdr conjuncts) |
1145 req (car conjunct) | 1145 req (car conjunct) |
1146 options (cdr conjunct) | 1146 options (cdr conjunct) |
1147 match (cond ((eq req 'type) | 1147 match (cond ((eq req 'type) |
1148 (or (memq window-system options) | 1148 (or (memq window-system options) |
1149 (if (display-graphic-p frame) | 1149 ;; FIXME: This should be revisited to use |
1150 (memq 'graphic options) | 1150 ;; display-graphic-p, provided that the |
1151 (memq 'tty options)) | 1151 ;; color selection depends on the number |
1152 ;; of supported colors, and all defface's | |
1153 ;; are changed to look at number of colors | |
1154 ;; instead of (type graphic) etc. | |
1155 (and (null window-system) | |
1156 (memq 'tty options)) | |
1152 (and (memq 'motif options) | 1157 (and (memq 'motif options) |
1153 (featurep 'motif)) | 1158 (featurep 'motif)) |
1154 (and (memq 'lucid options) | 1159 (and (memq 'lucid options) |
1155 (featurep 'x-toolkit) | 1160 (featurep 'x-toolkit) |
1156 (not (featurep 'motif))) | 1161 (not (featurep 'motif))) |