diff options
| author | João Távora | 2019-12-23 12:03:13 +0100 |
|---|---|---|
| committer | João Távora | 2019-12-23 12:03:13 +0100 |
| commit | c7e6b62d9e2f56bad176d391238e5d0ec7c28ade (patch) | |
| tree | 450e9766d4681a5f2621d22247e8a912ea9e400b | |
| parent | 1e758530b06befc6feb44031b9f84734e2165e2e (diff) | |
| download | emacs-c7e6b62d9e2f56bad176d391238e5d0ec7c28ade.tar.gz emacs-c7e6b62d9e2f56bad176d391238e5d0ec7c28ade.zip | |
Fix a bug in completion--flex-adjust-metadata
If minibuffer-default coincided with the first of completions, the
empty list would be returned.
* lisp/minibuffer.el (completion--flex-adjust-metadata): Make sure
to never return empty list.
| -rw-r--r-- | lisp/minibuffer.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index 2dba26818e1..6011a493d0b 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el | |||
| @@ -3612,7 +3612,8 @@ that is non-nil." | |||
| 3612 | for comp = (cadr l) | 3612 | for comp = (cadr l) |
| 3613 | when (string-prefix-p minibuffer-default comp) | 3613 | when (string-prefix-p minibuffer-default comp) |
| 3614 | do (setf (cdr l) (cddr l)) | 3614 | do (setf (cdr l) (cddr l)) |
| 3615 | and return (cons comp pre-sorted))) | 3615 | and return (cons comp pre-sorted) |
| 3616 | finally return pre-sorted)) | ||
| 3616 | (t | 3617 | (t |
| 3617 | pre-sorted)))))) | 3618 | pre-sorted)))))) |
| 3618 | `(metadata | 3619 | `(metadata |