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))) |