diff options
-rw-r--r-- | doc/misc/vtable.texi | 12 | ||||
-rw-r--r-- | lisp/emacs-lisp/vtable.el | 8 |
2 files changed, 13 insertions, 7 deletions
diff --git a/doc/misc/vtable.texi b/doc/misc/vtable.texi index 48e6301fce0..4f7b722a289 100644 --- a/doc/misc/vtable.texi +++ b/doc/misc/vtable.texi @@ -88,9 +88,9 @@ Here's just about the simplest vtable that can be created: ("Gazonk" 45))) @end lisp -By default, vtable uses the @code{variable-pitch} font, and -right-aligns columns that have only numerical data (and left-aligns -the rest). +By default, vtable uses the @code{vtable} face (which inherits from +the @code{variable-pitch} face), and right-aligns columns that have +only numerical data (and left-aligns the rest). You'd normally want to name the columns: @@ -383,9 +383,9 @@ there are several tables in the same buffer, then this should be @code{nil}. @item :face -The face to be used. This defaults to @code{variable-pitch}. This -face doesn't override the faces in the data, or the faces supplied by -the getter and formatter functions. +The face to be used. This defaults to @code{vtable}. This face +doesn't override the faces in the data, or the faces supplied by the +getter and formatter functions. @item :column-colors If present, this should be a list of color names to be used as the diff --git a/lisp/emacs-lisp/vtable.el b/lisp/emacs-lisp/vtable.el index 98106e46700..3e521c94a5c 100644 --- a/lisp/emacs-lisp/vtable.el +++ b/lisp/emacs-lisp/vtable.el @@ -28,6 +28,12 @@ (require 'text-property-search) (require 'mule-util) +(defface vtable + '((t :inherit variable-pitch)) + "Face used (by default) for vtables." + :version "29.1" + :group 'faces) + (cl-defstruct vtable-column "A vtable column." name @@ -79,7 +85,7 @@ formatter displayer (use-header-line t) - (face 'variable-pitch) + (face 'vtable) actions keymap (separator-width 1) sort-by |