Mercurial > emacs
comparison lisp/button.el @ 40337:57f029917c77
(button): Special face definition for MS-DOS terminals.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Fri, 26 Oct 2001 14:23:10 +0000 |
parents | eb6a85173992 |
children | 3ba2b666d7e1 |
comparison
equal
deleted
inserted
replaced
40336:8f116e4bd2cd | 40337:57f029917c77 |
---|---|
48 ;;; Code: | 48 ;;; Code: |
49 | 49 |
50 | 50 |
51 ;; Globals | 51 ;; Globals |
52 | 52 |
53 (defface button '((t :underline t)) | 53 (defface button '((((type pc) (class color)) |
54 (:foreground "lightblue")) | |
55 (t :underline t)) | |
54 "Default face used for buttons.") | 56 "Default face used for buttons.") |
55 | 57 |
56 ;;;###autoload | 58 ;;;###autoload |
57 (defvar button-map | 59 (defvar button-map |
58 (let ((map (make-sparse-keymap))) | 60 (let ((map (make-sparse-keymap))) |