diff --git a/lisp/org-table.el b/lisp/org-table.el index 2149376c6..d62aecfb9 100644 --- a/lisp/org-table.el +++ b/lisp/org-table.el @@ -1818,6 +1818,12 @@ it can be edited in place." (font-lock-fontify-block)))) (t (let ((pos (move-marker (make-marker) (point))) + (coord + (if (eq org-table-use-standard-references t) + (concat (org-number-to-letters (org-table-current-column)) + (int-to-string (org-table-current-dline))) + (concat "@" (int-to-string (org-table-current-dline)) + "$" (int-to-string (org-table-current-column))))) (field (org-table-get-field)) (cw (current-window-configuration)) p) @@ -1827,7 +1833,7 @@ it can be edited in place." (markerp org-field-marker)) (move-marker org-field-marker nil)) (erase-buffer) - (insert "#\n# Edit field and finish with C-c C-c\n#\n") + (insert "#\n# Edit field " coord " and finish with C-c C-c\n#\n") (let ((org-inhibit-startup t)) (org-mode)) (auto-fill-mode -1) (setq truncate-lines nil)