-
Notifications
You must be signed in to change notification settings - Fork 0
/
hydra.el
81 lines (72 loc) · 2.02 KB
/
hydra.el
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
(use-package hydra
:ensure t)
(defhydra hydra-zoom (global-map "s-SPC" :hint nil :color "blue")
"
g: increase scale
l: descrease scale
u: up trasparency
d: down transparency
"
("g" text-scale-increase "in")
("l" text-scale-decrease "out")
("u" transparency-up "transparency up")
("d" transparency-down "transparency down"))
(use-package major-mode-hydra
:ensure t
:bind
("M-SPC" . major-mode-hydra))
(major-mode-hydra-define org-mode nil
("Tree"
(("n" org-narrow-to-subtree "narrow to subtree")
("w" widen "widen")
("c" org-cycle "org-cycle")
("g" org-global-cycle "org-global-cycle"))
"Export"
(("e" org-export-dispatch))
"Image"
(("t" org-toggle-inline-images))
"Pomo"
(("p" org-pomodoro))))
(major-mode-hydra-define emacs-lisp-mode nil
("Eval"
(("b" eval-buffer "buffer")
("e" eval-defun "defun")
("r" eval-region "region"))
"REPL"
(("I" ielm "ielm"))
"Test"
(("t" ert "prompt")
("T" (ert t) "all")
("F" (ert :failed) "failed"))
"Doc"
(("d" describe-foo-at-point "thing-at-pt")
("f" describe-function "function")
("v" describe-variable "variable")
("i" info-lookup-symbol "info lookup"))))
(major-mode-hydra-define dired-mode nil
("Deletion"
(("d" dired-flag-file-deletion "flag delete")
("x" dired-do-flagged-delete "delete flagged files"))
"Copy"
(("C" dired-do-copy "copy"))))
(major-mode-hydra-define web-mode nil
("Navigation"
(("r" tide-references "references"))))
(major-mode-hydra-define typescript-mode nil
("Navigation"
(("r" tide-references "references"))))
(major-mode-hydra-define go-mode nil
("Navigation"
(("r" lsp-find-references "references"))
"Go"
(("R" go-run "run"))))
(major-mode-hydra-define python-mode nil
("Navigation"
(("r" lsp-bridge-find-references "R references"))
"Format"
(("f" lsp-bridge-code-format "<leader> l f format code")
("a" lsp-bridge-code-action"<leader> l a code action"))
"AI"
(("g" gptel "gptel"))
"Misc"
(("p" show-file-name "copy file name"))))