godotengine/emacs-gdscript-mode
1
0
Fork 0
mirror of https://github.com/godotengine/emacs-gdscript-mode.git synced 2025-12-31 21:48:34 +03:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #104 from VlachJosef/master

Browse Source 
Create hydra only when requested so we can detect missing hydra.el
This commit is contained in:
Nathan Lovato
2021-01-31 09:51:18 -06:00
committed by GitHub
parent bdce2da794 4a1175f467
commit 16c631cd6f
1 changed files with 8 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
gdscript-hydra.el
View File

@@ -47,11 +47,15 @@
(defvar gdscript-hydra--editor nil)
(defvar gdscript-hydra--debug-collisions nil)
(defvar gdscript-hydra--debug-navigation nil)
(defvar gdscript-hydra--hydra nil)
(defun gdscript-hydra-show ()
"Show gdcript hydra."
(interactive)
(gdscript-util--with-available-hydra (gdscript-hydra--menu/body)))
(gdscript-util--with-available-hydra
(unless gdscript-hydra--hydra
(setq gdscript-hydra--hydra (gdscript-hydra--create)))
(funcall gdscript-hydra--hydra)))
(defun gdscript-hydra--selected (selected)
"Visual representation for (non)SELECTED checkboxes."
@@ -110,11 +114,10 @@ on hydra checkboxes."
"Choose command to run from history of commands."
(gdscript-godot--run-command (gdscript-history--select-from-history)))
(ignore-errors
;; Don't signal an error when hydra.el is not present
(defun gdscript-hydra--create ()
(defhydra gdscript-hydra--menu (:hint none
:body-pre (setq gdscript-hydra--open t)
:before-exit (setq gdscript-hydra--open nil))
:body-pre (setq gdscript-hydra--open t)
:before-exit (setq gdscript-hydra--open nil))
"
_d_ (?d?) Debug _p_ run project _t_ run script _h_ run from history _a_ format all _q_ quit
_e_ (?e?) Editor _s_ run scene _r_ run last _g_ switch to *godot* _b_ format buffer