branch: elpa/helm
commit 1ddef42e47f4fd5dd89f3e6bd26d2bb1c5b879aa
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>
Use dst* in helm-acase
---
helm-mode.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/helm-mode.el b/helm-mode.el
index 965b66e409..d11e4d762f 100644
--- a/helm-mode.el
+++ b/helm-mode.el
@@ -1535,8 +1535,8 @@ dynamically otherwise use
`helm-completing-read-default-2'."
prompt (if pref-arg
(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)))
prompt)
prompt)
