Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-06-14 12:31:25 +00:00
Code Issues Projects Releases Packages Wiki Activity

; (crm-change-separator): Enable recursive minibuffers.

Browse source
This commit is contained in:
Eshel Yaron 2024-01-19 20:02:21 +01:00
parent dc4ce1052b
commit bc5c729d69
No known key found for this signature in database
GPG key ID: EF3EE9CA35D78618
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/emacs-lisp/crm.el
View file

@ -183,9 +183,10 @@ old `crm-separator' in the current minibuffer contents with REP.
Interactively, prompt for SEP. With a prefix argument, prompt
for REP as well."
(interactive
(let ((sep (read-regexp
(format-prompt "New separator" crm-current-separator)
crm-current-separator)))
(let* ((enable-recursive-minibuffers t)
(sep (read-regexp
(format-prompt "New separator" crm-current-separator)
crm-current-separator)))
(list sep
(when current-prefix-arg
(read-string-matching sep "Replace existing separators with: "))))