diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2019-04-23 10:35:31 +0200 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2019-04-23 10:35:31 +0200 |
| commit | 0f9b7114d1de2f9f87cd24a06c74c7a4938c7f8a (patch) | |
| tree | a65e60ddba3cc134c6b11af4f5bef1b766361337 | |
| parent | ffccea7d731e673b358fa2c79728a8455701b5f5 (diff) | |
| download | org-mode-0f9b7114d1de2f9f87cd24a06c74c7a4938c7f8a.tar.gz | |
org-table: Fix `org-table-map-tables'
* lisp/org-table.el (org-table-map-tables): Apply function at the
beginning of the table, not at the first affiliated keyword, if any.
Reported-by: Kaushal Modi <kaushal.modi@gmail.com>
<http://lists.gnu.org/r/emacs-orgmode/2019-04/msg00167.html>
| -rw-r--r-- | lisp/org-table.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-table.el b/lisp/org-table.el index f356091..f6b7af6 100644 --- a/lisp/org-table.el +++ b/lisp/org-table.el @@ -4105,7 +4105,7 @@ beginning and end position of the current table." (unless quietly (message "Mapping tables: %d%%" (floor (* 100.0 (point)) (buffer-size)))) - (goto-char (org-element-property :begin table)) + (goto-char (org-element-property :post-affiliated table)) (let ((end (copy-marker (org-element-property :end table)))) (unwind-protect (progn (funcall f) (goto-char end)) |