branch: elpa/helm commit 0de49e2ff6cff4ecc826dc01ad687718b6d798a3 Author: Thierry Volpiatto <thie...@posteo.net> Commit: Thierry Volpiatto <thie...@posteo.net>
Use dst* in helm-M-x --- helm-command.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/helm-command.el b/helm-command.el index 4b34f2021f..4def7f198f 100644 --- a/helm-command.el +++ b/helm-command.el @@ -331,8 +331,8 @@ Arg HISTORY default to `extended-command-history'." :fuzzy-match helm-M-x-fuzzy-match))) (prompt (concat (helm-acase helm-M-x-prefix-argument (- "-") - ((guard* (and (consp it) (car it))) - (if (eq guard 4) "C-u " (format "%d " guard))) + ((dst* (l &rest args)) + (if (eq l 4) "C-u " (format "%d " l))) ((guard* (integerp it)) (format "%d " it))) "M-x "))) (setq helm-M-x--timer (run-at-time 1 0.1 #'helm-M-x--notify-prefix-arg))