mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

Silent compiler warning

This commit is contained in:
Bastien 2020-02-02 20:09:17 +01:00
parent 4843030b45
commit 06d36ee60b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/org-table.el
View File

@ -464,7 +464,7 @@ This is useful when columns have been shrunk."
(end (point-at-eol)) spc)
(goto-char beg)
(while (progn (org-table-next-field) (< (point) end))
(let ((ov (first (overlays-in (point) (1+ (point))))))
(let ((ov (nth 0 (overlays-in (point) (1+ (point))))))
(if ov (push (overlay-get ov 'display) spc)
(push (org-table-get-field) spc))))
(format "|%s|" (mapconcat #'identity (reverse spc) "|")))))