From 5e3627e7b2d51762abae57896d74b58900ad9dd0 Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Fri, 19 Jan 2024 20:02:21 +0100 Subject: [PATCH] ; (crm-change-separator): Enable recursive minibuffers. --- lisp/emacs-lisp/crm.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lisp/emacs-lisp/crm.el b/lisp/emacs-lisp/crm.el index f9a2a1f049c..ebea8b060e1 100644 --- a/lisp/emacs-lisp/crm.el +++ b/lisp/emacs-lisp/crm.el @@ -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: ")))) -- 2.39.2