[Emacs-diffs] master dd98ee8: Fix test-completion with completion-regexp-list

[Noam Postavsky]

branch: master
commit dd98ee8992c3246861e44447ffcd02886a52878e
Author: Noam Postavsky <address@hidden>
Commit: Noam Postavsky <address@hidden>

    Fix test-completion with completion-regexp-list
    
    * src/minibuf.c (Ftest_completion): Handle alist COLLECTION with non-nil
    completion-regexp-list (Bug #23533).
---
 src/minibuf.c |    2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/minibuf.c b/src/minibuf.c
index efce7e2..57eea05 100644
--- a/src/minibuf.c
+++ b/src/minibuf.c
@@ -1686,6 +1686,8 @@ the values STRING, PREDICATE and `lambda'.  */)
       tem = Fassoc_string (string, collection, completion_ignore_case ? Qt : 
Qnil);
       if (NILP (tem))
        return Qnil;
+      else if (CONSP (tem))
+        tem = XCAR (tem);
     }
   else if (VECTORP (collection))
     {