diff options
| author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2019-11-27 05:55:32 +0100 |
|---|---|---|
| committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2019-11-27 05:55:32 +0100 |
| commit | e7e342ec2b2eb547b0c2c81230c6ec835b48d002 (patch) | |
| tree | 8ec6050fa0a289e32355a349c089514c9140af7c /helm-lib.el | |
| parent | a0e3a13638bb91077e334f0ce76be0f55e04788a (diff) | |
Allow disabling completion-styles in
helm-completion-styles-alist when needed.
* helm-command.el (helm-M-x-read-extended-command): Don't use
completion-styles per mode by using NOMODE arg.
* helm-lib.el (helm-dynamic-completion): Takes now one mode arg NOMODE.
* helm-mode.el (helm-completion-styles-alist): Docstring.
(helm-completing-read-default-2): Use NOMODE.
(helm-completion-in-region--set-completion-styles): Takes now one mode arg NOMODE.
(helm--completion-in-region): Fix setting helm-completion-style
through helm-completion-styles-alist.
Diffstat (limited to 'helm-lib.el')
| -rw-r--r-- | helm-lib.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/helm-lib.el b/helm-lib.el index c489ff47..dea248a6 100644 --- a/helm-lib.el +++ b/helm-lib.el @@ -1344,7 +1344,7 @@ I.e. when using `helm-next-line' and friends in BODY." (let (helm-follow-mode-persistent) (progn ,@body)))) -(defun helm-dynamic-completion (collection predicate &optional point metadata) +(defun helm-dynamic-completion (collection predicate &optional point metadata nomode) "Build a function listing the possible completions of `helm-pattern' in COLLECTION. Only the elements of COLLECTION that satisfy PREDICATE are considered. @@ -1365,10 +1365,11 @@ Example: :match-dynamic t) :buffer \"*helm test*\") -" +When argument NOMODE is non nil don't use `completion-styles' as +specified in `helm-completion-styles-alist'." (lambda () (let* ((completion-styles - (helm-completion-in-region--set-completion-styles)) + (helm-completion-in-region--set-completion-styles nomode)) (completion-flex-nospace t) (compsfn (lambda (str pred _action) (let* ((comps (completion-all-completions |