hmmm

* lisp/minibuffer.el (completion--get-lazy-hilit-re):
(completion--flex-get-completion-score): New functions.
(completion--flex-adjust-metadata): Use
completion--flex-get-completion-score.
(completion-lazy-hilit): Use completion--get-lazy-hilit-re.

diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index 2660c9d1a01de2bcf4ae6b8575f68cc23d790ad3..463f02ab1e32f471a3972a5f2cb28e0c3ee8d072 100644 (file)
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -3544,7 +3544,7 @@ advantage of this, look in the source of
 (defvar completion--lazy-highlight-cache
   (make-hash-table :weakness 'key))
 
-(defvar completion--score-map (make-hash-table :size (obarray-size obarray)))
+(defvar completion--score-map (make-hash-table :test 'eq))
 
 (defun completion--get-lazy-hilit-re ()
   "Helper for `completion-lazy-hilit'."