diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-14 01:56:15 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-04-14 01:56:15 +0200 |
| commit | 574ae74caa83194a9b4ce3d1f4239d10aabba2eb (patch) | |
| tree | e176bae4d126d3832f640e656d5a9bc40515c139 /lisp/emacs-lisp | |
| parent | a96679b742fef2058497ae445516f630c77d2a25 (diff) | |
| download | emacs-574ae74caa83194a9b4ce3d1f4239d10aabba2eb.tar.gz emacs-574ae74caa83194a9b4ce3d1f4239d10aabba2eb.tar.bz2 emacs-574ae74caa83194a9b4ce3d1f4239d10aabba2eb.zip | |
Fix dividers in vtable header lines
* lisp/emacs-lisp/vtable.el (vtable--insert-header-line): Put the
divider in the correct place in the header line.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/vtable.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/vtable.el b/lisp/emacs-lisp/vtable.el index 9b820c329a0..de7b9b7cdf5 100644 --- a/lisp/emacs-lisp/vtable.el +++ b/lisp/emacs-lisp/vtable.el @@ -590,12 +590,12 @@ This also updates the displayed table." name (- (elt widths index) indicator-width)) name) indicator)) - (or (vtable-divider table) "") (propertize " " 'display (list 'space :width (list (+ (- (elt widths index) (string-pixel-width displayed)) - (if last 0 spacer)))))) + (if last 0 spacer))))) + (or (vtable-divider table) "")) (put-text-property start (point) 'vtable-column index))) (vtable-columns table)) (insert "\n") |