branch: elpa/helm
commit 2177d93e351c912ceb99885a9e2f14d28fae53f5
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>
Comments only
---
helm-command.el | 1 +
helm-mode.el | 1 +
2 files changed, 2 insertions(+)
diff --git a/helm-command.el b/helm-command.el
index f77dddc785..cb6b6425d9 100644
--- a/helm-command.el
+++ b/helm-command.el
@@ -347,6 +347,7 @@ Arg HISTORY default to `extended-command-history'."
:fuzzy-match helm-M-x-fuzzy-match)))
(prompt (concat (helm-acase helm-M-x-prefix-argument
(- "-")
+ ;; Why &rest? isn't this always a list of one arg?
((dst* (l &rest args))
(if (eq l 4) "C-u " (format "%d " l)))
((guard* (integerp it)) (format "%d " it)))
diff --git a/helm-mode.el b/helm-mode.el
index a056112cf8..3d844b630f 100644
--- a/helm-mode.el
+++ b/helm-mode.el
@@ -1552,6 +1552,7 @@ dynamically otherwise use
`helm-completing-read-default-2'."
prompt (if pref-arg
(concat (helm-acase helm-M-x-prefix-argument
(- "-")
+ ;; Why &rest? isn't this always a list of one
arg?
((dst* (l &rest args))
(if (eq l 4) "C-u " (format "%d " l)))
((guard* (integerp it)) (format "%d " it)))
