R
Size: a a a
R
R
R
R
R
R
G(
G(
G(
(defun enable-modalka-mode ()
(interactive)
(modalka-mode t))
(use-package modalka
:ensure t
:bind
("<escape>" . 'enable-modalka-mode)
(:map modalka-mode-map)
("p" . 'modalka-mode)
("j" . 'backward-char)
("u" . 'left-word)
("k" . 'next-line)
("C-k" . 'end-of-buffer)
("i" . 'previous-line)
("C-i" . 'beginning-of-buffer)
("l" . 'forward-char)
("o" . 'right-word)
("h" . 'beginning-of-line)
(";" . 'end-of-line)
("y" . 'undo)
("v" . 'set-mark-command)
("c" . 'copy-region-as-kill)
:config
(defhydra hydra-kill (modalka-mode-map "d")
("j" delete-backward-char "backward-char")
("l" delete-char "char")
("u" backward-kill-word "backward-word")
("o" kill-word "word")
("v" kill-region "region")
("d" kill-line))
(defhydra hydra-package (modalka-mode-map "P")
("T" try "try")
("I" package-install "install")
("D" package-delete "delete")
("L" package-list-packages "list-packages"))
(defhydra hydra-eval (modalka-mode-map "e")
("D" eval-defun "defun")
("B" eval-buffer "buffer")
("R" eval-region "region")
("S" eval-last-sexp "sexp")
("E" eval-expression "expression"))
(setq-default cursor-type '(bar . 1))
(setq modalka-cursor-type 'box)
(modalka-global-mode t))
R
G(
R
R
G(
R
R