Backport commit 48aacbf29 from Emacs

* lisp/oc-basic.el (org-cite-basic--set-keymap): Adjust
buffer-substring generalized variable usage.

Make many seldom-used generalized variables obsolete
48aacbf292fbe8d4be7761f83bf87de93497df27
Lars Ingebrigtsen
Sun Aug 21 22:12:43 2022 +0200

[ km: This was independently covered on the main branch with
  a526ea6a3.  I'm applying it here too for bookkeeping/traceability
  purposes. ]
This commit is contained in:
Lars Ingebrigtsen 2022-08-21 22:12:43 +02:00 committed by Kyle Meyer
parent e58217ff1f
commit add8552b1d
1 changed files with 7 additions and 6 deletions

View File

@ -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)