diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-08-09 02:09:08 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-08-09 02:12:47 +0200 |
commit | 46f3f4c626d6dfe48c0101e3c994a929b542ba77 (patch) | |
tree | 546b93a9ee59e761679b2c610c1453a6257ad353 | |
parent | 134d5983ecffc968820336a758b20dee96980b72 (diff) | |
download | org-mode-46f3f4c626d6dfe48c0101e3c994a929b542ba77.tar.gz |
org-table: Fix number-or-marker-p error
* lisp/org-table.el (org-table-goto-field): Fix number-or-marker-p
error.
Initial patch by Rasmus <rasmus@gmx.us>.
Reported-by: Scott Randby <srandby@gmail.com>
<http://permalink.gmane.org/gmane.emacs.orgmode/99715>
-rw-r--r-- | lisp/org-table.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-table.el b/lisp/org-table.el index 62de402..b6d59f1 100644 --- a/lisp/org-table.el +++ b/lisp/org-table.el @@ -2560,14 +2560,14 @@ This function assumes the table is already analyzed (i.e., using (cond ((cdr (assoc ref org-table-named-field-locations))) ((string-match "\\`@\\([1-9][0-9]*\\)\\$\\([1-9][0-9]*\\)\\'" ref) - (cons (condition-case nil + (list (condition-case nil (aref org-table-dlines (string-to-number (match-string 1 ref))) (error (user-error "Invalid row number in %s" ref))) (string-to-number (match-string 2 ref)))) (t (user-error "Unknown field: %s" ref)))) (line (car coordinates)) - (column (cdr coordinates)) + (column (nth 1 coordinates)) (create-new-column (if (functionp create-column-p) (funcall create-column-p column) create-column-p))) |