diff options
Diffstat (limited to 'lisp')
| -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." | |||
| 152 | (when (or divider divider-width) | 152 | (when (or divider divider-width) |
| 153 | (setf (vtable-divider table) | 153 | (setf (vtable-divider table) |
| 154 | (or divider | 154 | (or divider |
| 155 | (and divider-width | 155 | (propertize |
| 156 | (propertize | 156 | " " 'display |
| 157 | " " 'display | 157 | (list 'space :width |
| 158 | (list 'space :width | 158 | (list (vtable--compute-width table divider-width))))))) |
| 159 | (list (vtable--compute-width | ||
| 160 | table divider-width)))))))) | ||
| 161 | (unless sort-by | 159 | (unless sort-by |
| 162 | (seq-do-indexed (lambda (column index) | 160 | (seq-do-indexed (lambda (column index) |
| 163 | (when (vtable-column-primary column) | 161 | (when (vtable-column-primary column) |