forked from colonelpanic/dotfiles
[Emacs] Add title strings to term-projectile hydra
This commit is contained in:
parent
ccb77eda56
commit
5e1c6c87d0
@ -3392,26 +3392,26 @@ in term-mode. This makes term-mode 1000% more useful
|
|||||||
(:body-pre
|
(:body-pre
|
||||||
(term-projectile-default-directory-forward-restored))
|
(term-projectile-default-directory-forward-restored))
|
||||||
"term - default-directory"
|
"term - default-directory"
|
||||||
("s" term-projectile-switch-to)
|
("s" term-projectile-switch-to "Switch to existing")
|
||||||
("f" term-projectile-default-directory-forward-restored)
|
("f" term-projectile-default-directory-forward-restored "Forward for current directory terminals")
|
||||||
("b" term-projectile-default-directory-backward-restored)
|
("b" term-projectile-default-directory-backward-restored "Backward for current directory terminals")
|
||||||
("c" term-projectile-default-directory-create-new-restored)
|
("c" term-projectile-default-directory-create-new-restored "Create new current directory terminal")
|
||||||
("d" term-projectile-default-directory-forward-restored)
|
("d" term-projectile-default-directory-forward-restored "Switch/Create default directory terminal")
|
||||||
("g" imalison:term-hydra-global/body-restored :exit t)
|
("g" imalison:term-hydra-global/body-restored "Switch/Create global terminal" :exit t)
|
||||||
("p" imalison:term-hydra-projectile/body-restored :exit t))
|
("p" imalison:term-hydra-projectile/body-restored "Switch/Create project terminal" :exit t))
|
||||||
|
|
||||||
(defhydra imalison:term-hydra-projectile
|
(defhydra imalison:term-hydra-projectile
|
||||||
(:body-pre
|
(:body-pre
|
||||||
(progn
|
(progn
|
||||||
(term-projectile-forward-restored)))
|
(term-projectile-forward-restored)))
|
||||||
"term - projectile"
|
"term - projectile"
|
||||||
("s" term-projectile-switch-to)
|
("s" term-projectile-switch-to "Switch to existing")
|
||||||
("f" term-projectile-forward-restored)
|
("f" term-projectile-forward-restored "Forward for project terminals")
|
||||||
("b" term-projectile-backward-restored)
|
("b" term-projectile-backward-restored "Backward for project terminals")
|
||||||
("c" term-projectile-create-new-restored)
|
("c" term-projectile-create-new-restored "Create new project terminal")
|
||||||
("d" imalison:term-hydra-default-directory/body-restored :exit t)
|
("d" imalison:term-hydra-default-directory/body-restored "Switch/Create default directory terminal" :exit t)
|
||||||
("g" imalison:term-hydra-global/body-restored :exit t)
|
("g" imalison:term-hydra-global/body-restored "Switch/Create global terminal" :exit t)
|
||||||
("p" term-projectile-forward-restored))
|
("p" term-projectile-forward-restored "Switch/Create project terminal"))
|
||||||
|
|
||||||
|
|
||||||
(defhydra imalison:term-hydra-global
|
(defhydra imalison:term-hydra-global
|
||||||
@ -3419,13 +3419,13 @@ in term-mode. This makes term-mode 1000% more useful
|
|||||||
(progn (setq imalison:term-hydra-original-default-directory
|
(progn (setq imalison:term-hydra-original-default-directory
|
||||||
default-directory)))
|
default-directory)))
|
||||||
"term - global"
|
"term - global"
|
||||||
("s" term-projectile-switch-to)
|
("s" term-projectile-switch-to "Switch to existing")
|
||||||
("f" term-projectile-global-forward-restored)
|
("f" term-projectile-global-forward-restored "Forward for project terminals")
|
||||||
("b" term-projectile-global-backward-restored)
|
("b" term-projectile-global-backward-restored "Backward for project terminals")
|
||||||
("c" term-projectile-global-create-new-restored)
|
("c" term-projectile-global-create-new-restored "Create new project terminal")
|
||||||
("d" imalison:term-hydra-default-directory/body-restored :exit t)
|
("d" imalison:term-hydra-default-directory/body-restored "Switch/Create default directory terminal" :exit t)
|
||||||
("g" term-projectile-global-forward-restored)
|
("g" term-projectile-global-forward-restored "Switch/Create global terminal")
|
||||||
("p" imalison:term-hydra-projectile/body-restored :exit t))
|
("p" imalison:term-hydra-projectile/body-restored "Switch/Create project terminal" :exit t))
|
||||||
|
|
||||||
(mapcar (lambda (term-projectile-function)
|
(mapcar (lambda (term-projectile-function)
|
||||||
(defalias (imalison:concat-symbols term-projectile-function '-restored)
|
(defalias (imalison:concat-symbols term-projectile-function '-restored)
|
||||||
|
Loading…
Reference in New Issue
Block a user