Add which-key

2 files changed, 4 insertions, 1 deletions

diff --git a/.emacs b/.emacs
index 17e9637..bc4075a 100644
--- a/.emacs
+++ b/.emacs
@@ -190,6 +190,7 @@
          '(:eval (if (>= text-scale-mode-amount 0) "🗚" "🗛"))
          'face-remap)
 (delight 'visual-line-mode nil t)
+(delight 'which-key-mode nil 'which-key)
 (delight 'whitespace-mode nil 'whitespace)
 (delight 'with-editor-mode "⸎" 'with-editor)
 ;; TODO: Narrow (⌖, ⛶)
diff --git a/.emacs-custom.el b/.emacs-custom.el
index 6580748..be57bbf 100644
--- a/.emacs-custom.el
+++ b/.emacs-custom.el
@@ -69,7 +69,7 @@
    '(("melpa" . "https://melpa.org/packages/")
      ("gnu" . "https://elpa.gnu.org/packages/")))
  '(package-selected-packages
-   '(debbugs eglot auctex diff-hl rg delight paradox flycheck magit markdown-mode page-break-lines rust-mode wgrep))
+   '(which-key debbugs eglot auctex diff-hl rg delight paradox flycheck magit markdown-mode page-break-lines rust-mode wgrep))
  '(page-break-lines-modes '(fundamental-mode text-mode prog-mode special-mode))
  '(paradox-execute-asynchronously t)
  '(paradox-github-token t)
@@ -89,6 +89,8 @@
  '(tool-bar-mode nil)
  '(truncate-lines t)
  '(visual-line-fringe-indicators '(left-curly-arrow right-curly-arrow))
+ '(which-key-idle-delay 0.5)
+ '(which-key-mode t)
  '(whitespace-style
    '(face trailing tabs spaces newline empty indentation space-after-tab space-before-tab space-mark tab-mark newline-mark)))
 (custom-set-faces