some key mappings

init.org

@@ -403,7 +403,8 @@ Windows Theme:
   (which-key-mode)
   (which-key-setup-side-window-right-bottom)
   (which-key-setup-minibuffer)
-  (setq which-key-idle-delay 0.5))
+  (setq which-key-idle-delay 0.5
+        which-key-show-early-on-C-h t))
 #+END_SRC
 
 * abbrev
@@ -525,7 +526,8 @@ Windows Theme:
    ([return] . nil)
    ("TAB" . company-complete-selection)
    ([tab] . company-complete-selection)
-   ("<right>" . company-complete-common))
+   ("<right>" . company-complete-common)
+   ("<escape>" . company-abort))
   :hook
   (after-init . global-company-mode)
   (emacs-lisp-mode . my/company-elisp)