diff options
Diffstat (limited to 'lisp/org/oc-basic.el')
| -rw-r--r-- | lisp/org/oc-basic.el | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/lisp/org/oc-basic.el b/lisp/org/oc-basic.el index 8c76e200e4f..398d2e2d3fa 100644 --- a/lisp/org/oc-basic.el +++ b/lisp/org/oc-basic.el @@ -460,12 +460,13 @@ substitutes for the unknown key. Finally, it may be the symbol (_ (lambda () (interactive) - (setf (buffer-substring beg end) - (concat "@" - (if (= 1 (length suggestions)) - (car suggestions) - (completing-read "Did you mean: " - suggestions nil t)))))))) + (goto-char beg) + (delete-region beg end) + (insert "@" + (if (= 1 (length suggestions)) + (car suggestions) + (completing-read "Did you mean: " + suggestions nil t))))))) (put-text-property beg end 'keymap km))) (defun org-cite-basic-activate (citation) |