refactor: update popper-mode

seagle0128 · Oct 13, 2023 · 186f5e2 · 186f5e2
1 parent dbfb2cd
commit 186f5e2
Showing 1 changed file with 6 additions and 8 deletions.
diff --git a/lisp/init-window.el b/lisp/init-window.el
@@ -145,15 +145,15 @@
 ;; Enforce rules for popups
 (use-package popper
   :diminish (popper-mode popper-echo-mode)
-  :functions popper-echo-mode
   :custom
   (popper-group-function #'popper-group-by-directory)
   (popper-echo-dispatch-actions t)
   :bind (:map popper-mode-map
-         ("C-h z"     . popper-toggle)
-         ("C-<tab>"   . popper-cycle)
-         ("C-M-<tab>" . popper-toggle-type))
-  :hook (emacs-startup . popper-mode)
+         ("C-h z"       . popper-toggle)
+         ("C-<tab>"     . popper-cycle)
+         ("C-M-<tab>"   . popper-toggle-type))
+  :hook ((emacs-startup . popper-mode)
+         (popper-mode   . popper-echo-mode))
   :init
   (setq popper-reference-buffers
         '("\\*Messages\\*"
@@ -221,10 +221,8 @@
                              (bound-and-true-p doom-modeline-mode))
                         (format " %s "
                                 (nerd-icons-octicon "nf-oct-pin" :face face))
-                      (propertize " POP" 'face face))))))
+                      (propertize " POP " 'face face))))))
   :config
-  (popper-echo-mode 1)
-
   (with-no-warnings
     (defun my-popper-fit-window-height (win)
       "Determine the height of popup window WIN by fitting it to the buffer's content."