Copy edit make-vtable code

* lisp/emacs-lisp/vtable.el (make-vtable): Clean up code slightly.

diff --git a/lisp/emacs-lisp/vtable.el b/lisp/emacs-lisp/vtable.el
index 2c6c90ee1f55898ef123cc08887588a85e269a8c..03fe54c94e937990b05d798b0d98dfb09d4c09e7 100644 (file)
--- 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)