diff --git a/lisp/org-footnote.el b/lisp/org-footnote.el index 739660967..e23e417ee 100644 --- a/lisp/org-footnote.el +++ b/lisp/org-footnote.el @@ -552,13 +552,13 @@ or new, let the user edit the definition of the footnote." (org-footnote-auto-adjust-maybe)) (t (insert "[" label "]") - (let ((l (copy-marker (org-footnote-create-definition label)))) - (org-footnote-auto-adjust-maybe) - (or (ignore-errors (org-footnote-goto-definition label l)) - ;; Since definition was created outside current - ;; scope, edit it remotely. - (progn (set-marker l nil) - (org-edit-footnote-reference)))))))) + (org-footnote-create-definition label) + (org-footnote-auto-adjust-maybe) + (if (ignore-errors (org-footnote-goto-definition label)) + (forward-char) + ;; Definition was created outside current scope: edit it + ;; remotely. + (org-edit-footnote-reference)))))) (defvar org-blank-before-new-entry) ; Silence byte-compiler. (defun org-footnote-create-definition (label)