Commit ab797368 authored by Nicolas Goaziou's avatar Nicolas Goaziou
Browse files

org-table: Fix alignment issue with entities

* lisp/org-table.el (org-table-justify-field-maybe): Preserve text
  properties so entities can be properly aligned.
parent d2cb298e
......@@ -963,10 +963,7 @@ Optional argument NEW may specify text to replace the current field content."
(progn
(setq s (match-string 1)
o (match-string 0)
l (max 1
(- (org-string-width
(buffer-substring-no-properties
(match-end 0) (match-beginning 0))) 3))
l (max 1 (- (org-string-width o) 3))
e (not (= (match-beginning 2) (match-end 2))))
(setq f (format (if num " %%%ds %s" " %%-%ds %s")
l (if e "|" (setq org-table-may-need-update t) ""))
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment