mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-11-28 07:44:49 +00:00
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:
parent
e58217ff1f
commit
add8552b1d
@ -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)
|
||||
|
Loading…
Reference in New Issue
Block a user