From 42a4c847e286957bef579390e9cb9854699dacfd Mon Sep 17 00:00:00 2001 From: Thierry Volpiatto Date: Wed, 5 Mar 2025 10:37:03 +0100 Subject: [PATCH] Fix register-use-preview behavior with never value Allow popping up preview when pressing C-h. Don't exit the minibuffer when the call to register-read-with-preview-fancy is triggered by C-h. * lisp/register.el (register-read-with-preview-fancy): Do it. --- lisp/register.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/register.el b/lisp/register.el index b0ee759ec5b..373d7e54550 100644 --- a/lisp/register.el +++ b/lisp/register.el @@ -569,7 +569,11 @@ or \\='never." (setq pat input)))) (if (setq win (get-buffer-window buffer)) (with-selected-window win - (when noconfirm + (when (or (eq noconfirm t) ; Using insist + ;; Don't exit when noconfirm == (never) + ;; If we are here user has pressed C-h + ;; calling `register-preview-1'. + (memq nil noconfirm)) ;; Happen only when ;; *-use-preview == insist. (exit-minibuffer))