From aa2ece8aba6f95984e391e35360c824aafac25d6 Mon Sep 17 00:00:00 2001 From: Thierry Volpiatto Date: Sat, 9 Jul 2022 21:22:32 +0200 Subject: [PATCH] Fix completing-read's using something else than `t' --- helm-mode.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/helm-mode.el b/helm-mode.el index 4c79e832d..2543ac315 100644 --- a/helm-mode.el +++ b/helm-mode.el @@ -738,6 +738,9 @@ that use `helm-comp-read'. See `helm-M-x' for example." nil "Error: History should be specified as a symbol") (when (get-buffer helm-action-buffer) (kill-buffer helm-action-buffer)) + (unless (memq must-match '(confirm confirm-after-completion t nil)) + ;; Fix completing-read's using something else than `t' e.g. 1 or whatever. + (setq must-match t)) (let ((action-fn `(("Sole action (Identity)" . (lambda (candidate) (if ,marked-candidates