Mercurial > hg > xemacs-beta
comparison lisp/faces.el @ 217:d44af0c54775 r20-4b7
Import from CVS: tag r20-4b7
| author | cvs |
|---|---|
| date | Mon, 13 Aug 2007 10:08:34 +0200 |
| parents | 78f53ef88e17 |
| children | 262b8bb4a523 |
comparison
equal
deleted
inserted
replaced
| 216:43306a74e31c | 217:d44af0c54775 |
|---|---|
| 1669 ;; the first non-stream device. We initialize the tty global values here. | 1669 ;; the first non-stream device. We initialize the tty global values here. |
| 1670 ;; We cannot initialize the X global values here because they depend | 1670 ;; We cannot initialize the X global values here because they depend |
| 1671 ;; on having already resourced the global face specs, which happens | 1671 ;; on having already resourced the global face specs, which happens |
| 1672 ;; when the first X device is created. | 1672 ;; when the first X device is created. |
| 1673 | 1673 |
| 1674 (set-face-background-pixmap 'modeline [nothing]) | |
| 1675 | |
| 1676 (when (featurep 'tty) | 1674 (when (featurep 'tty) |
| 1677 (set-face-highlight-p 'bold t 'global 'tty) | 1675 (set-face-highlight-p 'bold t 'global 'tty) |
| 1678 (set-face-underline-p 'italic t 'global 'tty) | 1676 (set-face-underline-p 'italic t 'global 'tty) |
| 1679 (set-face-highlight-p 'bold-italic t 'global 'tty) | 1677 (set-face-highlight-p 'bold-italic t 'global 'tty) |
| 1680 (set-face-underline-p 'bold-italic t 'global 'tty) | 1678 (set-face-underline-p 'bold-italic t 'global 'tty) |