diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2013-09-05 15:43:11 +0300 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2013-09-05 15:43:11 +0300 |
| commit | 5877bb8d7e55eda3f81a36bfabe4dd816a34269f (patch) | |
| tree | 779550b544f248132cd97c819070fb8aa0aa8bd7 /lisp/faces.el | |
| parent | e7873136dd8dbacbbebf534500355d29a07fed8e (diff) | |
| download | emacs-5877bb8d7e55eda3f81a36bfabe4dd816a34269f.tar.gz | |
Removed unnecessary tests for GUI sessions and created menu faces.
Diffstat (limited to 'lisp/faces.el')
| -rw-r--r-- | lisp/faces.el | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index 9a34aec2549..f5957d9dbad 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -2135,8 +2135,15 @@ terminal type to a different value." (defun tty-set-up-initial-frame-faces () (let ((frame (selected-frame))) (frame-set-background-mode frame t) - (face-set-after-frame-default frame))) - + (face-set-after-frame-default frame) + (make-face 'tty-menu-enabled-face) + (make-face 'tty-menu-disabled-face) + (make-face 'tty-menu-selected-face) + (set-face-foreground 'tty-menu-enabled-face "yellow") + (set-face-foreground 'tty-menu-disabled-face "white") + (set-face-background 'tty-menu-enabled-face "blue") + (set-face-background 'tty-menu-disabled-face "blue") + (set-face-background 'tty-menu-selected-face "red"))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |