Minor edits.

.emacs.d/modules/completion/company/config.el

@@ -4,8 +4,7 @@
   :commands company-complete-common company-manual-begin company-grab-line
   :hook (doom-first-input . global-company-mode)
   :init
-  (setq company-idle-delay 0.25
-        company-minimum-prefix-length 2
+  (setq company-minimum-prefix-length 2
         company-tooltip-limit 14
         company-tooltip-align-annotations t
         company-require-match 'never
@@ -53,20 +52,21 @@
       :before #'company-begin-backend
       (company-abort)))
 
-  (add-hook 'after-change-major-mode-hook #'+company-init-backends-h 'append))
+  (add-hook 'after-change-major-mode-hook #'+company-init-backends-h 'append)
 
+  (when (featurep! +tng)
+    (company-tng-mode +1))
 
-(use-package! company-tng
-  :when (featurep! +tng)
-  :after-call post-self-insert-hook
-  :config
-  (add-to-list 'company-frontends 'company-tng-frontend)
-  (define-key! company-active-map
-    "RET"       nil
-    [return]    nil
-    "TAB"       #'company-select-next
-    [tab]       #'company-select-next
-    [backtab]   #'company-select-previous))
+  ;; NOTE Fix #1335: ensure `company-emulation-alist' is the first item of
+  ;;      `emulation-mode-map-alists', thus higher priority than keymaps of
+  ;;      evil-mode. We raise the priority of company-mode keymaps
+  ;;      unconditionally even when completion is not activated. This should not
+  ;;      cause problems, because when completion is activated, the value of
+  ;;      `company-emulation-alist' is ((t . company-my-keymap)), when
+  ;;      completion is not activated, the value is ((t . nil)).
+  (add-hook! 'evil-local-mode-hook
+    (when (memq 'company-emulation-alist emulation-mode-map-alists)
+      (company-ensure-emulation-alist))))
 
 
 ;;
@@ -137,7 +137,20 @@
 https://github.com/sebastiencs/company-box/issues/44"
     :around #'company-box--update-scrollbar
     (letf! ((#'display-buffer-in-side-window #'ignore))
-      (apply orig-fn args))))
+      (apply orig-fn args)))
+
+  ;; `company-box' performs insufficient frame-live-p checks. Any command that
+  ;; "cleans up the session" will break company-box.
+  ;; TODO Fix this upstream.
+  (defadvice! +company-box-detect-deleted-frame-a (frame)
+    :filter-return #'company-box--get-frame
+    (if (frame-live-p frame) frame))
+  (defadvice! +company-box-detect-deleted-doc-frame-a (_selection frame)
+    :before #'company-box-doc
+    (and company-box-doc-enable
+         (frame-local-getq company-box-doc-frame frame)
+         (not (frame-live-p (frame-local-getq company-box-doc-frame frame)))
+         (frame-local-setq company-box-doc-frame nil frame))))
 
 
 (use-package! company-dict

.emacs.d/modules/completion/company/packages.el

@@ -1,7 +1,7 @@
 ;; -*- no-byte-compile: t; -*-
 ;;; completion/company/packages.el
 
-(package! company :pin "4462e7d399c3d2e1ea1f5d018f4537f1f3d5acfc")
+(package! company :pin "5f5949b6ae8ea9df94c6cb3e01d9cae43623b794")
 (package! company-dict :pin "cd7b8394f6014c57897f65d335d6b2bd65dab1f4")
 (when (featurep! +childframe)
-  (package! company-box :pin "d8f71fde7a3301a62f9f6f627aa51610a294f4df"))
+  (package! company-box :pin "be37a9a30dc112ab172af21af694e2cb04a74f85"))

.emacs.d/modules/completion/helm/autoload/helm.el

@@ -56,7 +56,8 @@ workspace."
         (helm-rg-default-directory (or in (doom-project-root) default-directory))
         (helm-rg-default-extra-args
          (delq nil (append (list (when all-files "-z -uu")
-                                 (unless recursive "--maxdepth 1"))
+                                 (unless recursive "--maxdepth 1")
+                                 "--hidden")
                            args))))
     (setq deactivate-mark t)
     (helm-rg (or query

.emacs.d/modules/completion/helm/packages.el

@@ -1,7 +1,7 @@
 ;; -*- no-byte-compile: t; -*-
 ;;; completion/helm/packages.el
 
-(package! helm :pin "d2fbf66ea727f27cdf867b2bd6d6f7c706f99192")
+(package! helm :pin "19d2ba9d36615f1dea6be6cd6dcf5792dfefc45b")
 (package! helm-rg :pin "ee0a3c09da0c843715344919400ab0a0190cc9dc")
 (package! helm-c-yasnippet :pin "89cc8561e7e57e9d1070ee3641df019c7f49c5dd")
 (package! helm-company :pin "6eb5c2d730a60e394e005b47c1db018697094dde")
@@ -13,7 +13,7 @@
 (when (featurep! +fuzzy)
   (package! helm-flx :pin "6640fac5cb16bee73c95b8ed1248a4e5e113690e"))
 (when (featurep! +childframe)
-  (package! posframe :pin "7b92a54e588889a74d36d51167e067676db7be8a"))
+  (package! posframe :pin "5696463afe2b0bc7b9c2705663daf9afc7ef18ad"))
 (when (featurep! :lang org)
   (package! helm-org :pin "b7a18dfc17e8b933956d61d68c435eee03a96c24"))
 (package! helm-descbinds :pin "b72515982396b6e336ad7beb6767e95a80fca192")

.emacs.d/modules/completion/ido/packages.el

@@ -1,8 +1,8 @@
 ;; -*- no-byte-compile: t; -*-
 ;;; completion/ido/packages.el
 
-(package! flx-ido :pin "17f5c9cb2af18aa6f52910ff4a5a63591261ced5")
+(package! flx-ido :pin "647cb2f92f9936c62e277d7a74ad54a80502d255")
 (package! ido-completing-read+ :pin "b9ca2566b867464c25b720e2148d240961c110e7")
 (package! ido-sort-mtime :pin "f638ff0c922af862f5211779f2311a27fde428eb")
-(package! ido-vertical-mode :pin "16c4c1a112796ee0bcf401ea39d3e2643a89feaf")
+(package! ido-vertical-mode :pin "5a6e17048528c328c129db6dccfe605f301ddef2")
 (package! crm-custom :pin "f1aaccf64306a5f99d9bf7ba815d7ea41c15518d")

.emacs.d/modules/completion/ivy/autoload/hydras.el

@@ -1,33 +1,32 @@
 ;;; completion/ivy/autoload/hydras.el -*- lexical-binding: t; -*-
 ;;;###if (featurep! :ui hydra)
 
-(eval-when-compile (require 'ivy-hydra))
-
-;;;###autoload (autoload 'hydra-ivy/body "completion/ivy/autoload/hydras" nil nil)
-(defhydra+ hydra-ivy (:hint nil :color pink)
-  "
+;;;###autoload
+(after! ivy-hydra
+  (defhydra+ hydra-ivy (:hint nil :color pink)
+    "
  Move     ^^^^^^^^^^ | Call         ^^^^ | Cancel^^ | Options^^ | Action _w_/_s_/_a_: %s(ivy-action-name)
 ----------^^^^^^^^^^-+--------------^^^^-+-------^^-+--------^^-+---------------------------------
  _g_ ^ ^ _k_ ^ ^ _u_ | _f_orward _o_ccur | _i_nsert | _c_alling: %-7s(if ivy-calling \"on\" \"off\") _C_ase-fold: %-10`ivy-case-fold-search
  ^↨^ _h_ ^+^ _l_ ^↕^ | _RET_ done     ^^ | _q_uit   | _m_atcher: %-7s(ivy--matcher-desc) _t_runcate: %-11`truncate-lines
  _G_ ^ ^ _j_ ^ ^ _d_ | _TAB_ alt-done ^^ | ^ ^      | _<_/_>_: shrink/grow
 "
-  ;; arrows
-  ("l" ivy-alt-done)
-  ("h" ivy-backward-delete-char)
-  ("g" ivy-beginning-of-buffer)
-  ("G" ivy-end-of-buffer)
-  ("d" ivy-scroll-up-command)
-  ("u" ivy-scroll-down-command)
-  ("e" ivy-scroll-down-command)
-  ;; actions
-  ("q" keyboard-escape-quit :exit t)
-  ("<escape>" keyboard-escape-quit :exit t)
-  ("TAB" ivy-alt-done :exit nil)
-  ("RET" ivy-done :exit t)
-  ("C-SPC" ivy-call-and-recenter :exit nil)
-  ("f" ivy-call)
-  ("c" ivy-toggle-calling)
-  ("m" ivy-toggle-fuzzy)
-  ("t" (setq truncate-lines (not truncate-lines)))
-  ("o" ivy-occur :exit t))
+    ;; arrows
+    ("l" ivy-alt-done)
+    ("h" ivy-backward-delete-char)
+    ("g" ivy-beginning-of-buffer)
+    ("G" ivy-end-of-buffer)
+    ("d" ivy-scroll-up-command)
+    ("u" ivy-scroll-down-command)
+    ("e" ivy-scroll-down-command)
+    ;; actions
+    ("q" keyboard-escape-quit :exit t)
+    ("<escape>" keyboard-escape-quit :exit t)
+    ("TAB" ivy-alt-done :exit nil)
+    ("RET" ivy-done :exit t)
+    ("C-SPC" ivy-call-and-recenter :exit nil)
+    ("f" ivy-call)
+    ("c" ivy-toggle-calling)
+    ("m" ivy-toggle-fuzzy)
+    ("t" (setq truncate-lines (not truncate-lines)))
+    ("o" ivy-occur :exit t)))

.emacs.d/modules/completion/ivy/autoload/ivy.el

@@ -272,6 +272,7 @@ The point of this is to avoid Emacs locking up indexing massive file trees."
          (directory (or in project-root))
          (args (concat (if all-files " -uu")
                        (unless recursive " --maxdepth 1")
+                       " --hidden"
                        " " (mapconcat #'shell-quote-argument args " "))))
     (setq deactivate-mark t)
     (counsel-rg

.emacs.d/modules/completion/ivy/config.el

@@ -360,7 +360,7 @@ evil-ex-specific constructs, so we disable it solely in evil-ex."
     (setf (alist-get fn ivy-posframe-display-functions-alist)
           #'ivy-display-function-fallback))
 
-  (add-hook 'doom-reload-hook #'posframe-delete-all))
+  (add-hook 'doom-after-reload-hook #'posframe-delete-all))
 
 
 (use-package! flx
@@ -374,6 +374,7 @@ evil-ex-specific constructs, so we disable it solely in evil-ex."
   :when (featurep! +prescient)
   :hook (ivy-mode . ivy-prescient-mode)
   :hook (ivy-prescient-mode . prescient-persist-mode)
+  :commands +ivy-prescient-non-fuzzy
   :init
   (setq prescient-filter-method
         (if (featurep! +fuzzy)

.emacs.d/modules/completion/ivy/packages.el

@@ -1,7 +1,7 @@
 ;; -*- no-byte-compile: t; -*-
 ;;; completion/ivy/packages.el
 
-(package! swiper :pin "9bb68419f1088ee4d8f2b76f84995fa02bceeed3")
+(package! swiper :pin "b65e401c22ec56a008b00f651cd9536caf593d43")
 (package! ivy)
 (package! ivy-hydra)
 (package! counsel)
@@ -12,12 +12,12 @@
 (package! wgrep :pin "f0ef9bfa44db503cdb2f83fcfbd2fa4e2382ef1f")
 
 (if (featurep! +prescient)
-    (package! ivy-prescient :pin "cc289ba3b0d89f251267ca2b669d01b3afecc530")
+    (package! ivy-prescient :pin "0c5d611d9fc6431dd049a71a6eda163c37617a33")
   (when (featurep! +fuzzy)
-    (package! flx :pin "17f5c9cb2af18aa6f52910ff4a5a63591261ced5")))
+    (package! flx :pin "05600ff855020515d1243cf919cba1a6e77e7a1c")))
 
 (when (featurep! +childframe)
-  (package! ivy-posframe :pin "44749562a9e68bd43ccaa225b31311476fab1251"))
+  (package! ivy-posframe :pin "b4fed551ab7447ffaad1d802949cac7631e57a0d"))
 
 (when (featurep! +icons)
   (package! all-the-icons-ivy :pin "a70cbfa1effe36efc946a823a580cec686d5e88d"))