Avoid changing field positions with `org-table-get-field'

* lisp/org-table.el (org-table-get-field): Make sure the new field
content is at least one space character.
This commit is contained in:
Carsten Dominik 2011-05-26 08:39:46 +02:00
parent 9f81e43973
commit 9e5ab4053e
1 changed files with 2 additions and 1 deletions

View File

@ -1141,7 +1141,8 @@ is always the old value."
(let* ((pos (match-beginning 0))
(val (buffer-substring (1+ pos) (match-end 0))))
(if replace
(replace-match (concat "|" replace) t t))
(replace-match (concat "|" (if (equal replace "") " " replace))
t t))
(goto-char (min (point-at-eol) (+ 2 pos)))
val)
(forward-char 1) ""))