(defvar hydra--ignore nil
"When non-nil, don't call `hydra-curr-on-exit'")
+(defvar hydra--input-method-function nil
+ "Store overridden `input-method-function' here.")
+
(defun hydra-disable ()
"Disable the current Hydra."
(remove-hook 'pre-command-hook 'hydra--clearfun)
((blue teal) t)
(t nil)))))
-(defvar hydra--input-method-function nil
- "Store overridden `input-method-function' here.")
-
(defun hydra-default-pre ()
"Default setup that happens in each head before :pre."
(when (eq input-method-function 'key-chord-input-method)