lang/org: fix void-variable error upon backspace in tables #472

This commit is contained in:
Henrik Lissner 2018-03-22 14:41:07 -04:00
parent e89ed0e9ae
commit 48f5811e0d
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -290,12 +290,12 @@ with `org-cycle'). Also:
(save-match-data
(when (and (org-at-table-p)
(not (org-region-active-p))
(string-match "|" (buffer-substring (point-at-bol) (point)))
(looking-at ".*?|"))
(string-match-p "|" (buffer-substring (point-at-bol) (point)))
(looking-at-p ".*?|"))
(let ((pos (point))
(noalign (looking-at "[^|\n\r]* |"))
(noalign (looking-at-p "[^|\n\r]* |"))
(c org-table-may-need-update))
(delete-char n)
(delete-char 1)
(unless overwrite-mode
(skip-chars-forward "^|")
(insert " ")