diff options
| author | Lars Ingebrigtsen | 2022-04-14 02:37:44 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2022-04-14 02:37:44 +0200 |
| commit | 8969836cb8e36df9dcd3f5031b2dcc648c4c90dc (patch) | |
| tree | 5c13c1b204dbba8f7227b5500c25cc7d7ca2a455 | |
| parent | 5a9e4f2230e76d53499cdd574a2cca61c9c3a1d0 (diff) | |
| download | emacs-8969836cb8e36df9dcd3f5031b2dcc648c4c90dc.tar.gz emacs-8969836cb8e36df9dcd3f5031b2dcc648c4c90dc.zip | |
Edit some vtable doc strings
* lisp/emacs-lisp/vtable.el (make-vtable, vtable): Improve doc
strings.
| -rw-r--r-- | lisp/emacs-lisp/vtable.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/vtable.el b/lisp/emacs-lisp/vtable.el index 943ede159a1..2c6c90ee1f5 100644 --- a/lisp/emacs-lisp/vtable.el +++ b/lisp/emacs-lisp/vtable.el | |||
| @@ -68,7 +68,7 @@ | |||
| 68 | (row-colors :initarg :row-colors :accessor vtable-row-colors) | 68 | (row-colors :initarg :row-colors :accessor vtable-row-colors) |
| 69 | (-cached-colors :initform nil :accessor vtable--cached-colors) | 69 | (-cached-colors :initform nil :accessor vtable--cached-colors) |
| 70 | (-cache :initform (make-hash-table :test #'equal))) | 70 | (-cache :initform (make-hash-table :test #'equal))) |
| 71 | "A object to hold the data for a table.") | 71 | "An object to hold the data for a table.") |
| 72 | 72 | ||
| 73 | (defvar-keymap vtable-map | 73 | (defvar-keymap vtable-map |
| 74 | "S" #'vtable-sort-by-current-column | 74 | "S" #'vtable-sort-by-current-column |
| @@ -100,7 +100,9 @@ | |||
| 100 | column-colors) | 100 | column-colors) |
| 101 | "Create and insert a vtable at point. | 101 | "Create and insert a vtable at point. |
| 102 | The vtable object is returned. If INSERT is nil, the table won't | 102 | The vtable object is returned. If INSERT is nil, the table won't |
| 103 | be inserted." | 103 | be inserted. |
| 104 | |||
| 105 | See info node `(vtable)Top' for vtable documentation." | ||
| 104 | (when objects-function | 106 | (when objects-function |
| 105 | (setq objects (funcall objects-function))) | 107 | (setq objects (funcall objects-function))) |
| 106 | ;; Auto-generate the columns. | 108 | ;; Auto-generate the columns. |