From ffb7612d2cf84ca1863a10873eb4a9721ffc720d Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Thu, 14 Apr 2022 02:41:27 +0200 Subject: Copy edit make-vtable code * lisp/emacs-lisp/vtable.el (make-vtable): Clean up code slightly. --- lisp/emacs-lisp/vtable.el | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) (limited to 'lisp/emacs-lisp/vtable.el') 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) -- cgit v1.2.3