Call `completion-list-mode' to avoid slowness of the first completion

when UTF-2000 is running.

diff --git a/lisp/list-mode.el b/lisp/list-mode.el
index 25d2418..60c0ee3 100644 (file)
--- a/lisp/list-mode.el
+++ b/lisp/list-mode.el
@@ -658,3 +658,8 @@ Go to the window from which completion was requested."
                                            (point-max)))))
 
 ;;; list-mode.el ends here
+
+;; [tomo] ad-hoc method to avoid slowness of the first completion
+(if (featurep 'utf-2000)
+    (with-temp-buffer
+      (completion-list-mode)))