split which key config to init-which-key.el
This commit is contained in:
2 files changed
+26
-5
No files matched your search
@@ -104,6 +104,7 @@ If freezing sometimes, decrease it. If stuttering, increase it.")
|
|||||||
(add-to-list 'load-path creature/pkg-dir t)
|
(add-to-list 'load-path creature/pkg-dir t)
|
||||||
(add-subdirs-to-load-path creature/pkg-dir)
|
(add-subdirs-to-load-path creature/pkg-dir)
|
||||||
|
|
||||||
|
|
||||||
(require 'init-built-in)
|
(require 'init-built-in)
|
||||||
(require 'init-git)
|
(require 'init-git)
|
||||||
(require 'init-edit)
|
(require 'init-edit)
|
||||||
@@ -112,12 +113,8 @@ If freezing sometimes, decrease it. If stuttering, increase it.")
|
|||||||
(require 'init-keybindings)
|
(require 'init-keybindings)
|
||||||
(require 'init-tools)
|
(require 'init-tools)
|
||||||
(require 'init-ibuffer)
|
(require 'init-ibuffer)
|
||||||
|
(require 'init-which-key)
|
||||||
|
|
||||||
(require 'which-key)
|
|
||||||
(setq which-key-show-early-on-C-h t)
|
|
||||||
(setq which-key-idle-delay 10000)
|
|
||||||
(setq which-key-idle-secondary-delay 0.05)
|
|
||||||
(which-key-mode 'toggle)
|
|
||||||
|
|
||||||
(setq custom-file (expand-file-name "custom.el" creature/cache-dir))
|
(setq custom-file (expand-file-name "custom.el" creature/cache-dir))
|
||||||
(when (file-exists-p custom-file)
|
(when (file-exists-p custom-file)
|
||||||
|
|||||||
@@ -0,0 +1,24 @@
|
|||||||
|
;; -*- coding: utf-8; lexical-binding: t; -*-
|
||||||
|
|
||||||
|
(require 'which-key)
|
||||||
|
(setq which-key-show-early-on-C-h t)
|
||||||
|
(setq which-key-idle-delay 10000)
|
||||||
|
(setq which-key-idle-secondary-delay 0.05)
|
||||||
|
(which-key-mode 1)
|
||||||
|
|
||||||
|
(which-key-add-keymap-based-replacements
|
||||||
|
creature/map
|
||||||
|
"b" "buffer"
|
||||||
|
"c" "comments"
|
||||||
|
"e" "errors"
|
||||||
|
"el" "lines"
|
||||||
|
"ex" "error message"
|
||||||
|
"f" "files"
|
||||||
|
"g" "magit"
|
||||||
|
"gf" "magit files"
|
||||||
|
"h" "help"
|
||||||
|
"q" "quit option"
|
||||||
|
"j" "jump")
|
||||||
|
|
||||||
|
|
||||||
|
(provide 'init-which-key)
|
||||||
Reference in new issue
Block a user