[hydra] add more windows keybindings; make more consistent

This commit is contained in:
contrapunctus 2021-07-01 03:42:22 +05:30
parent 5257568556
commit d753be5599
1 changed files with 9 additions and 2 deletions

View File

@ -1238,6 +1238,8 @@ Add these common operations to the hydra -
"Window"
("e" delete-window "delete this") ;; QWERTY d
("o" delete-other-windows "delete others")
("z" delete-window "delete this")
("v" delete-other-windows "delete others")
("t" split-window-below "split below")
("n" split-window-right "split right")
("c" enlarge-window "increase height")
@ -1289,7 +1291,6 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
#+BEGIN_SRC emacs-lisp
(defhydra contrapunctus-general-hydra (:color blue)
"What command?"
("c" chronometrist "chronometrist")
("G" elpher "elpher")
("O" cp-org/body "org")
("p" contrapunctus-programming-hydra-dispatch-language "programming")
@ -1297,6 +1298,11 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
("e" contrapunctus-emms-hydra/body "emms")
("j" cp-jabber/body "Jabber")
("0" delete-window "delete this")
("1" delete-other-windows "delete others")
("2" split-window-below "split below")
("3" split-window-right "split right")
("c" chronometrist "chronometrist")
("C" contrapunctus-mc-hydra/body "multiple cursors")
("d" dired-jump "dired-jump")
("D" (cp-insert-timestamp t) "date")
@ -1324,10 +1330,12 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
("t" cp-org-set-tags "tags")
("n" cp-org-nav/body "navigation")
("c" chronometrist "chronometrist")
("C" contrapunctus-mc-hydra/body "multiple cursors")
("d" dired-jump "dired-jump")
("D" (cp-insert-timestamp t) "date")
("E" toggle-debug-on-error "tdoe")
("G" contrapunctus-general-hydra/body "up")
("h" helpful-at-point "Help")
("i" (find-file "~/.emacs.d/init.org") "open init")
("I" contrapunctus-info-hydra/body "Info")
@ -1387,7 +1395,6 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
("w" contrapunctus-window-hydra/body "window")
("k" (kill-buffer (current-buffer)) "kill")
("N" contrapunctus-line-display-hydra/body "line display")
("c" chronometrist "chronometrist")
("G" contrapunctus-general-hydra/body "up"))
#+END_SRC
*** Emacs Lisp