;;; button.el --- clickable buttons
;;
-;; Copyright (C) 2001-2011 Free Software Foundation, Inc.
+;; Copyright (C) 2001-2012 Free Software Foundation, Inc.
;;
;; Author: Miles Bader <miles@gnu.org>
;; Keywords: extensions
;; button face may not be visible. Using overlays avoids this.
;;
;; Using `define-button-type' to define default properties for buttons
-;; is not necessary, but it is is encouraged, since doing so makes the
+;; is not necessary, but it is encouraged, since doing so makes the
;; resulting code clearer and more efficient.
;;
;; Use color for the MS-DOS port because it doesn't support underline.
;; FIXME if MS-DOS correctly answers the (supports) question, it need
;; no longer be a special case.
-(defface button '((((type pc) (class color))
- (:foreground "lightblue"))
- (((supports :underline t)) :underline t)
- (t (:foreground "lightblue")))
+(defface button '((t :inherit link))
"Default face used for buttons."
:group 'basic-faces)