From: Lars Ingebrigtsen Date: Thu, 14 Apr 2022 00:41:27 +0000 (+0200) Subject: Copy edit make-vtable code X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~16^2~2370^2~585 X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=ffb7612d2cf84ca1863a10873eb4a9721ffc720d;p=emacs.git 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 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)