Mercurial > emacs
diff lisp/cus-theme.el @ 67961:52f526ce11f6
* cus-edit.el (custom-button-mouse): New variable.
(custom-button-mouse): New face.
(custom-raised-buttons, custom-mode): Use it.
* cus-theme.el (custom-new-theme-mode): Use custom-button-mouse.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Sat, 31 Dec 2005 16:26:01 +0000 |
parents | 1bae1f8d1fd0 |
children | a711a44049e2 |
line wrap: on
line diff
--- a/lisp/cus-theme.el Sat Dec 31 15:29:39 2005 +0000 +++ b/lisp/cus-theme.el Sat Dec 31 16:26:01 2005 +0000 @@ -50,8 +50,7 @@ (set (make-local-variable 'widget-documentation-face) 'custom-documentation) (set (make-local-variable 'widget-button-face) custom-button) (set (make-local-variable 'widget-button-pressed-face) custom-button-pressed) - (if custom-raised-buttons - (set (make-local-variable 'widget-mouse-face) custom-button)) + (set (make-local-variable 'widget-mouse-face) custom-button-mouse) (when custom-raised-buttons (set (make-local-variable 'widget-push-button-prefix) "") (set (make-local-variable 'widget-push-button-suffix) "")