diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-14 02:41:27 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-14 02:41:27 +0200 |
| commit | ffb7612d2cf84ca1863a10873eb4a9721ffc720d (patch) | |
| tree | f2a55f5aeec55417d76b92c249201f9afc6a1980 /lisp/emacs-lisp/vtable.el | |
| parent | 8969836cb8e36df9dcd3f5031b2dcc648c4c90dc (diff) | |
| download | emacs-ffb7612d2cf84ca1863a10873eb4a9721ffc720d.tar.gz emacs-ffb7612d2cf84ca1863a10873eb4a9721ffc720d.tar.bz2 emacs-ffb7612d2cf84ca1863a10873eb4a9721ffc720d.zip | |
Copy edit make-vtable code
* lisp/emacs-lisp/vtable.el (make-vtable): Clean up code slightly.
Diffstat (limited to 'lisp/emacs-lisp/vtable.el')
| -rw-r--r-- | lisp/emacs-lisp/vtable.el | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/lisp/emacs-lisp/vtable.el b/lisp/emacs-lisp/vtable.el index 2c6c90ee1f5..03fe54c94e9 100644 --- a/lisp/emacs-lisp/vtable.el +++ b/lisp/emacs-lisp/vtable.el @@ -152,12 +152,10 @@ See info node `(vtable)Top' for vtable documentation." (when (or divider divider-width) (setf (vtable-divider table) (or divider - (and divider-width - (propertize - " " 'display - (list 'space :width - (list (vtable--compute-width - table divider-width)))))))) + (propertize + " " 'display + (list 'space :width + (list (vtable--compute-width table divider-width))))))) (unless sort-by (seq-do-indexed (lambda (column index) (when (vtable-column-primary column) |