diff options
| author | João Távora <joaotavora@gmail.com> | 2021-08-22 16:36:26 +0100 |
|---|---|---|
| committer | João Távora <joaotavora@gmail.com> | 2021-08-22 16:36:26 +0100 |
| commit | 1afe59f7f888fd80e9bbad502d96e5e2ee9feb4c (patch) | |
| tree | daf79b521d06aeda3603a5d106920e051ec7b25b /lisp/icomplete.el | |
| parent | ba852512f23fdab674086e35d4207e3970dd0912 (diff) | |
| download | emacs-1afe59f7f888fd80e9bbad502d96e5e2ee9feb4c.tar.gz emacs-1afe59f7f888fd80e9bbad502d96e5e2ee9feb4c.tar.bz2 emacs-1afe59f7f888fd80e9bbad502d96e5e2ee9feb4c.zip | |
Double check completions-group customization variable in Icomplete
bug#48545
* lisp/icomplete.el (icomplete--augment): Double check completions-group.
Diffstat (limited to 'lisp/icomplete.el')
| -rw-r--r-- | lisp/icomplete.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/icomplete.el b/lisp/icomplete.el index 03616f9b6aa..0fa5f367349 100644 --- a/lisp/icomplete.el +++ b/lisp/icomplete.el @@ -760,7 +760,8 @@ by `group-function''s second \"transformation\" protocol." (plist-get completion-extra-properties :affixation-function))) (ann-fun (or (completion-metadata-get md 'annotation-function) (plist-get completion-extra-properties :annotation-function))) - (grp-fun (completion-metadata-get md 'group-function)) + (grp-fun (and completions-group + (completion-metadata-get md 'group-function))) (annotated (cond (aff-fun (funcall aff-fun prospects)) |