diff options
| author | Thierry Volpiatto <thievol@posteo.net> | 2021-04-17 20:12:52 +0200 |
|---|---|---|
| committer | Thierry Volpiatto <thievol@posteo.net> | 2021-04-17 20:12:52 +0200 |
| commit | dd47140b0dd3ff2ad2a4d6bc15d922789553048e (patch) | |
| tree | c77a7169406e9113db15b8bbaebea561244a85fc /helm-command.el | |
| parent | 85d87adfe42ba27460e691fca1fcaf6a1168f05b (diff) | |
Fix helm-M-x history calling predicate on a string instead of a symbol
Diffstat (limited to 'helm-command.el')
| -rw-r--r-- | helm-command.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/helm-command.el b/helm-command.el index cdb5ae90..b7b6137f 100644 --- a/helm-command.el +++ b/helm-command.el @@ -246,7 +246,11 @@ default to `extended-command-history'." (lambda (str) (funcall pred (intern-soft str))) nil 'nosort t) (lambda () (helm-comp-read-get-candidates - (or history extended-command-history) pred))) + ;; History should be quoted to + ;; force `helm-comp-read-get-candidates' + ;; to use predicate against + ;; symbol and not string. + (or history 'extended-command-history) pred))) :fuzzy-match (null helm-M-x-use-completion-styles)) ,(helm-make-source "Emacs Commands" 'helm-M-x-class :match-dynamic helm-M-x-use-completion-styles |