Use `condition-case-unless-debug'

Declare the hint early to avoid compile warnings

* hydra.el (hydra-fontify-head-greyscale): Update unused arg.
(hydra--make-defun): Update.
(hydra--head-name): Take one less arg.
(defhydra): Update hint position.

* hydra-init.el: Byte compile more stuff.

* hydra-test.el: Update tests.

* Makefile: Rename compile target to "run", update "compile".

hydra.el: Bump version

Don't re-activate key chords too early

* hydra.el (hydra-disable): Re-activate key chords only if
  `hydra--ignore' is nil.
(hydra-keyboard-quit): Update.

Re #97

hydra.el (defhydra): Re-throw a caught error when debug-on-error

* hydra.el (defhydra): Update.

Add an idle message timeout option

* hydra.el (hydra-keyboard-quit): Update.
(hydra--make-defun): Update.
(hydra-timeout-timer): Rename from `hydra-timer'.
(hydra-message-timer): New defvar.
(hydra-idle-message): New defun.
(hydra-timeout): Update.

Small example:

(defhydra hydra-zoom (:idle 1.0)
  "zoom"
  ("g" text-scale-increase "in")
  ("l" text-scale-decrease "out"))
(global-set-key (kbd "<f2> g") 'hydra-zoom/body)

With this code, `hydra-zoom/body' will display the hint not immediately
but after 1.0 seconds. If you manage to exit the hydra by then, the hint
will not be displayed. Other functions will display the hint
immediately.

Fixes #108

hydra.el (hydra--format): Fix "s-t" issue

* hydra.el (hydra--format): Update.

Fixes #107.

Add integration test for red hydras temporarily exiting

* hydra-test.el (hydra-simple-3): Add.
(hydra-integration-3): Add.

Re #109

Fix red heads not exiting temporarily

* hydra.el (hydra--ignore): New defvar.
(hydra-disable): Don't call :post unless `hydra--ignore' is nil.
(hydra--make-defun): Temporarily disable transient map before calling
the command.

Fixes #109

README.md: Update `hydra-zoom/body'

README.md: Update intro

hydra.el (hydra--format): Match alnum for the "_..._" syntax

Fixes #106

Work around `overriding-terminal-local-map' being terminal-local

* hydra.el (hydra-disable): Try to reset `overriding-terminal-local-map'
  for each frame, so that it doesn't happen that the hydra is cancelled
  in one frame, but not in the other. `hydra-curr-on-exit' is called in
  the first frame for which there's a transient map.

(hydra--clearfun): Disable when `overriding-terminal-local-map' is nil.

Fixes #105

README.md: Add video demo link

Move `this-command' setter

* hydra.el (hydra--call-interactively): New defun.
(hydra--make-defun): Update.

Re #79

Set `this-command' when appropriate

* hydra.el (hydra--make-defun): Update.

* hydra-test.el: Update tests.

Re #79

hydra.el (hydra--head-color): Remove

* hydra.el (hydra-fontify-head-default): Move `hydra--head-color' body
  here.
(hydra-fontify-head-greyscale): Simplify.
(hydra--make-defun): Simplify.
(hydra--head-name): Simplify.
(hydra--delete-duplicates): Update.
(defhydra): Update.

hydra.el (hydra--head-color): Simplify

* hydra.el (hydra-face-red):
(hydra-face-blue):
(hydra-face-amaranth):
(hydra-face-pink):
(hydra-face-teal): Improve docstrings.
(hydra--head-color): Simplify.
(defhydra): Use copy-sequence on inherited heads. Move :cmd-name setting
to the very end, when :exit is already set.

* hydra-test.el: Update tests.

Make digit and negative arguments work in 24.3

* hydra.el (hydra--digit-argument): Update.
(hydra--negative-argument): Update.

Just flatten these two functions to their 25.2 bodies, and don't call
the `set-transient-map' variants, since the map remains anyway because
of `hydra-base-map'.

Add an integration test for digit args in amaranth

* hydra-test.el (hydra-simple-1): Rename.
(hydra-simple-2): New auxiliary hydra.
(hydra-integration-2): Add test.

Re #104

Account for digit argument

* hydra.el (hydra--clearfun): Update. digit-argument will modify
  this-command-keys-vector, but not this-single-command-keys.

Fixes #104

Finalize head inheritance

* hydra.el (hydra--body-exit): New defun.
(defhydra): Ensure that each head doesn't need the :exit info from the
body any more by putting the aggregated :exit in the head's own plist.

* hydra-test.el: Update tests.

Each hydra will now declare its own heads as a variable `foo/heads`.
It's possible to inherit them like this:

(defhydra hydra-zoom-child (:inherit (hydra-zoom/heads))
  "zoom"
  ("q" nil))

One hydra can inherit from multiple parents. This one just adds a single
"q" head to the familiar hydra-zoom.

Fixes #57.

hydra.el (hydra--body-color): Remove

* hydra.el (hydra--head-color): Update.
(hydra--make-defun): Update.
(defhydra): Update.

hydra.el (hydra--face): Remove

* hydra.el (hydra-fontify-head-default): Update.

Use a variable instead of a function for the hint

* hydra.el (hydra--message): Remove.
(hydra--make-defun): Update.
(defhydra): Replace "defun foo/hint" with "defvar foo/hint".

This will allow to dynamically modify the hint in the future.

* hydra-test.el: Update tests.

Use `unwind-protect' for :after-exit

* hydra.el (hydra--make-defun): Update.

This change makes "C-g" work for this hydra:

(defhydra hydra-goto-line (global-map "M-g"
                           :pre (linum-mode 1)
                           :after-exit (linum-mode -1)
                           :exit t)
  ("g" goto-line "line")
  ("c" goto-char "char"))

Re #90

Add basic error handling

* hydra.el (defhydra): When the macro fails, message an error and
  continue as if the defhydra call wasn't there.

Alias :post to :before-exit, and add :after-exit

* hydra.el (hydra--make-defun): Update.
(hydra--make-funcall): Update doc.
(defhydra): Update.

Re #90

Simplify `keyboard-quit'

* hydra.el (hydra--clearfun): Update.
(hydra-keyboard-quit): Remove defcustom.
(defhydra): Update.

* hydra-test.el: Update tests.
(hydra-integration-1): Catch the 'quit signal, since now "C-g" is just a
plain `keyboard-quit'.

Don't double-call :post

* hydra.el (hydra--make-defun): Update.

* hydra-test.el: Update tests.

:post will be called via `hydra-curr-on-exit' in `hydra-disable'.

Re #90

Update the tests for the new `hydra-set-transient-map'

* hydra-test.el (hydra-red-error): Update.
(hydra-blue-toggle): Update.
(hydra-amaranth-vi): Update.
(hydra-zoom-duplicate-1): Update.
(hydra-zoom-duplicate-2): Update.

Re #90

Quit Hydra for `handle-switch-frame'

* hydra.el (hydra--clearfun): Update.
(hydra-base-map): Update.
(hydra--handle-switch-frame): Remove.

Re #90, #73.

Adapt to the new `hydra-set-transient-map'

* hydra.el (hydra-set-transient-map): Amend arglist.
(hydra--clearfun): Don't count on there being another transient map.
(hydra-disable): Update.
(internal-push-keymap): Define unless defined.
(internal-pop-keymap): Define unless defined.
(hydra--pred): Remove.
(hydra--universal-argument): Update.
(hydra-last): Remove.
(hydra--aggregate-color): Remove.
(hydra--unalias-var): Remove.
(hydra-pink-fallback): Remove.
(hydra--modify-keymap): Remove.
(hydra--make-defun): Update.

Re #90

Move away from setting "t" in keymaps

* hydra.el (hydra-curr-on-exit): New defvar.
(hydra-curr-foreign-keys): New defvar.
(hydra-clearfun): New defun.
(hydra-amaranth-warn): New defun.
(hydra-set-transient-map): Use own defun instead of `set-transient-map'.
(hydra--universal-argument): Update.
(hydra--make-defun): Update.
(hydra--handle-nonhead): Remove.
(defhydra): Update.

Re #90

Try to re-encode the input in the terminal

* hydra.el (hydra--handle-nonhead): Update. Most interesting sequences
  start with [27 91] or [27 79]. It's hard to do it for all of them.

Re #90

hydra.el (hydra--format): Add some more symbols

Re #103 #102

Update testing setup

* .travis.yml: Add emacs-snapshot.

* Makefile: Echo the path to the emacs binary.

* hydra-test.el: Echo Emacs version.

Add integration testing

* hydra-test.el (hydra-simple): Add example hydra that will be run.
(hydra-with): New defmacro.
(hydra-integration-1): Add test.

Re #101

hydra.el (hydra-set-transient-map): Update

A quick fix for the recursion issue in Emacs 25.

I'll have to see at some point why the recursion was happening.

Fixes #101

hydra.el (hydra-pink-fallback): Allow prefix arguments

* hydra.el (hydra-pink-fallback): Update.

Fixes #93

Use `hydra-keyboard-quit' instead of `hydra-cleanup'

* hydra.el (hydra--pred): Update.
(hydra--make-defun): Update.
(hydra-cleanup): Remove.
(hydra-keyboard-quit): Absorb `hydra-cleanup'.

* hydra-test.el (hydra-red-error): Update test.
(hydra-blue-toggle): Update test.
(hydra-amaranth-vi): Update test.
(hydra-zoom-duplicate-1): Update test.
(hydra-zoom-duplicate-2): Update test.

Fixes #100

hydra.el (hydra--make-funcall): Update location

Fixes #99

hydra.el (hydra--digit-argument): Fix for Emacs 24.3

* hydra.el (hydra--digit-argument): Update.

Fixes #98

hydra.el (defhydra): Simplify :cmd-name part

* hydra.el (defhydra): When a plist isn't nil, `plist-put' can be used,
which is useful to overwrite :cmd-name if it's present. When plist is
nil, use the old code.

Use set/defvar for keymap

* hydra.el (defhydra): Update. This should facilitate debugging, since a
  plain defvar wouldn't be re-evaluated.

* hydra-test.el (hydra-red-error): Update test.
(hydra-blue-toggle): Update test.
(hydra-amaranth-vi): Update test.
(hydra-zoom-duplicate-1): Update test.
(hydra-zoom-duplicate-2): Update test.

Define a keymap var for each hydra and re-use it

* hydra.el (hydra--make-defun): It will receive not the keymap, but the
  variable that hold the keymap.
(defhydra): Define keymap as a variable.

* hydra-test.el (hydra-red-error): Update test.
(hydra-blue-toggle): Update test.
(hydra-amaranth-vi): Update test.
(hydra-zoom-duplicate-1): Update test.
(hydra-zoom-duplicate-2): Update test.

hydra.el: Bump version

hydra.el (defhydra): Avoid eager macroexpansion failure

* hydra.el (defhydra): Don't test with keymapp, unless the symbol is
  bound. When the mode isn't loaded yet, the keymap symbol isn't bound.

hydra.el (defhydra): Simplify and improve the key binding code

* hydra.el (defhydra): Update.

As a side effect, :bind head property can now be a keymap, in addition
to a lambda.

hydra.el (hydra--make-funcall): Add

* hydra-test.el (hydra--make-funcall): Add test.

hydra.el (defhydra): Improve docstring

Disable key-chord for the duration of the hydra

* hydra.el (hydra--input-method-function): New defvar.
(hydra-default-pre): Disable key-chord.
(hydra-cleanup): Re-enable key-chord.
(hydra--make-defun): Call `hydra-default-pre' for each head.

Fixes #97

hydra-test.el (hydra-format-4): Add test

Re #94

hydra-examples.el (hydra-rectangle): Update

hydra.el (hydra--format): Update regex order

hydra.el (hydra--format): Amend regex

Allow `hydra-repeat' to take a numeric arg

* hydra.el (hydra-repeat): Update.

It's possible now, for instance with `hydra-vi' to do this:

    4j.2..

This will forward-line 4 times (4j), 4 times (.), 2 times (2.), 2
times (.).

Fixes #92

Don't default `hydra-repeat--prefix-arg' to 1

* hydra.el (hydra-repeat): Update.

Re #61

Mention the leading newline in `defhydra' docstring

* hydra.el (hydra--handle-switch-frame): Update doc.
(hydra--format): Update doc.
(hydra-timeout): Update doc.
(defhydra): Update doc.
(defhydradio): Update doc.

Fixes #88.

Fix argument to `replace-match'

* hydra.el (hydra--format): Update.

* hydra-test.el (hydra-format-3): Add test.

Fixes #91

Fix blue/red heads with same cmd

* hydra.el (hydra--make-defun): Update.
(hydra--head-name): Change signature, since body is needed to determine
the color. When the head will exit, add "-and-exit" to its name (except
for the nil head and body).
(defhydra): Update the call to `hydra--head-name', since it's not valid
until the head has a hint.

* hydra-test.el (hydra-blue-toggle): Update.
(hydra-amaranth-vi): Update.
(hydra-zoom-duplicate-1): Update.
(hydra-zoom-duplicate-2): Update.

Fixes #84

Allow for the "%s`foo" spec.

* hydra.el (hydra--format): Update. Treat variables in the same way as
  s-expressions.

* hydra-test.el (hydra-format-2): Add test.
(hydra-format-with-sexp-2): Add test.

Fixes #85

hydra.el: Turn on lexical-binding

* hydra.el (hydra-set-transient-map): Fix warning.
(hydra--head-color): Fix warning.
(hydra--hint): Update signature.
(hydra--format): Update.
(hydra--matrix): Fix warning.
(defhydra): Fix warning.
(defhydradio): Fix warning.

Minor fixes

* hydra.el (hydra--format): Save match data.
(hydra--handle-nonhead): Don't quote lambda.
(hydra--cycle-radio): Use cl-incf.

Set pink/amaranth override recursively

* hydra.el (hydra--modify-keymap): New defun.
(hydra--handle-nonhead): Update.

Fixes #81.

hydra.el (hydra-keyboard-quit): Clean up the message area

* hydra.el (hydra-keyboard-quit): Update.

Fixes #80.

lv.el (lv-message): Use setq-local for window-min-height

Call :post for :timeout

* hydra.el (hydra--make-defun): When both :timeout and :post are given,
  if `hydra-timeout' runs out, it will call :post before
  `hydra-keyboard-quit'.
(hydra-timeout): Update to call function if it's given. Always call
`hydra-keyboard-quit' afterwards.

For this example code:

(global-set-key
 (kbd "C-c t")
 (defhydra test-hydra-b
     (:timeout 2.0 :post (message "test b quit"))
   "test b"
   ("x" (message "x"))
   ("y" (message "y"))
   ("q" nil "quit")))

The message "test b quit" is issued:

- on "q"

- on "x" or "y", after one of them has started the timer, and the timer
  ran out. The timer is set to 2.0 seconds, and is reset each time "x"
  or "y" is pressed.

- not on a plain "C-c t"

Fixes #34

Don't bind `hydra-keyboard-quit' in foreign keymaps

* hydra.el (defhydra): Update.

Fixes #78.

Add hydra-rectangle example

* hydra-examples.el (hydra-toggle-simple): Rename from `hydra-toggle'.
(hydra-rectangle): New hydra.

hydra-examples.el (hydra-apropos): Add.

Fix switch-frame handling.

Calling only `hydra-keyboard-quit' on switch-frame event was
effectively stopping the original frame switch. This change adds a
call to the original handler after calling `hydra-keyboard-quit'.

See #73

* hydra.el: Add `hydra--handle-switch-frame'

* hydra-test.el: Update

Fixes #77

hydra.el (hydra--format): Extend key regex with ";:"

Re #75

Bind [switch-frame] to `hydra-keyboard-quit'

* hydra.el (hydra-base-map): Update.

* hydra-test.el: Update.

Fixes #73.

lv.el: Update truncation rules

* lv.el (lv-window): Defer `truncate-lines' to `lv-message'. Set window
  hscroll to 0, just in case.
(lv-message): If STR is one-line, set `truncate-lines' to nil, otherwise
set it to t. Make `window-min-height' buffer-local and set it to the
amount of newlines in STR.

Re #40.

README.md: Fix up typos

Wiki link to the "Home" page instead.

README.md: Add toc

Re #71

README.md: describe docstring

README.md: finish up the rules

README.md: move some stuff to wiki, add more stuff

README.md: update

hydra-examples.el (hydra-buffer-menu): Fix example

Makefile: Simplify

* hydra-init.el: Add bare init.

Now, typing:

    make compile

in the hydra repository will start an "emacs -q" with all hydras from
hydra-examples.el defined. Thus you can test that they work for you.
The simplest one is "<f2> g", you can type that in any buffer.

If you want to test with a different version of emacs, just type e.g.:

    make compile emacs=emacs24

Re #70.

hydra-examples.el: Fixup

"C-g" (`hydra-keyboard-quit' ) should run :post

* hydra.el (hydra--handle-nonhead): Bind the plain `hydra-keyboard-quit'
  only when there's no :post.
(defhydra): When there's :post, add another head for keyboard quit.

* hydra-test.el (hydra-amaranth-vi): Update test.

Fixes #67.

Fix wrong type argument in hydra-timeout

Update `golden-ratio-mode' work-around

* lv.el (lv-window): Update.
(lv-message): Update.

Re #64.

hydra-ox.el (hydra-ox): Update parameter list

The `defhydradio' spec for each parameter was updated to:

    (name &optional doc value)

This way, it's easy to define this type of hydra:

(defhydradio hydra-tng ()
  (picard "_p_ Captain Jean Luc Picard:")
  (riker "_r_ Commander William Riker:")
  (data "_d_ Lieutenant Commander Data:")
  (worf "_w_ Worf:")
  (la-forge "_f_ Geordi La Forge:")
  (troi "_t_ Deanna Troi:")
  (dr-crusher "_c_ Doctor Beverly Crusher:")
  (phaser "_h_ Set phasers to " [stun kill]))

(defhydra hydra-tng (:color pink)
  (concat (hydra--table hydra-tng/names 7 2 '("  % -30s %% -3`%s" "%s %%`%s"))
          "\n\n")
  ("p" (hydra-tng/picard) nil)
  ("r" (hydra-tng/riker) nil)
  ("d" (hydra-tng/data) nil)
  ("w" (hydra-tng/worf) nil)
  ("f" (hydra-tng/la-forge) nil)
  ("t" (hydra-tng/troi) nil)
  ("c" (hydra-tng/dr-crusher) nil)
  ("h" (hydra-tng/phaser) nil)
  ("b" beam-down "beam down" :exit t)
  ("o" (hydra-reset-radios hydra-tng/names) "reset")
  ("q" nil "cancel"))

Add option to specify :hint in body

* hydra.el (hydra-plist-get-default): New defun, extended `plist-get'.
(hydra--head-property): Use `hydra-plist-get-default'.
(defhydra): The heads will inherit their hint from body :hint parameter.
They can override it, of course.

The most use you can get out of this parameter is to specify :hint nil
for hydras with a format-style docstring.

Example:

(defhydra hydra-org-template (:color blue :hint nil)
  "
_c_enter  _q_uote    _L_aTeX:
_l_atex   _e_xample  _i_ndex:
_a_scii   _v_erse    _I_NCLUDE:
_s_rc     ^ ^        _H_TML:
_h_tml    ^ ^        _A_SCII:
"
  ("s" (hot-expand "<s"))
  ("e" (hot-expand "<e"))
  ("q" (hot-expand "<q"))
  ("v" (hot-expand "<v"))
  ("c" (hot-expand "<c"))
  ("l" (hot-expand "<l"))
  ("h" (hot-expand "<h"))
  ("a" (hot-expand "<a"))
  ("L" (hot-expand "<L"))
  ("i" (hot-expand "<i"))
  ("I" (hot-expand "<I"))
  ("H" (hot-expand "<H"))
  ("A" (hot-expand "<A"))
  ("<" self-insert-command "ins")
  ("o" nil "quit"))

Some setup:

(defun hot-expand (str)
  "Expand org template."
  (insert str)
  (org-try-structure-completion))
(define-key org-mode-map "<"
  (lambda () (interactive)
     (if (looking-back "^")
         (hydra-org-template/body)
       (self-insert-command 1))))

hydra-ox.el: Emulate org-mode export dispatch

* hydra-ox.el (hydra-ox): New radiogroup.
(hydra-ox-html): New hydra.
(hydra-ox-latex): New hydra.
(hydra-ox-text): New hydra.
(hydra-ox): New hydra that includes the above three hydras.
(org-mode-map): Add test binding.

Re #66.

Allow for a %s(test) spec in docstring

* hydra.el (hydra-set-transient-map): Avoid compiler warnings.
(hydra--format): Add s? to regex.

- %(test) will translate to (format "%S" (test))
- %s(test) will translate to (format "%s" (test))

The width specifiers should work for both, e.g. % -10(test) or %
-10s(test).

Example:

(defhydra hydra-marked-items (dired-mode-map "")
  "
Number of marked items: %(length (dired-get-marked-files))
Directory size: %s(shell-command-to-string \"du -hs\")
"
  ("m" dired-mark "mark"))

Fixes #65.

lv.el (lv-window): Bind `golden-ratio-mode' to nil

Re #64.

Add :timeout option to hydra body

* hydra.el (hydra--make-defun): Call `hydra-timeout' with :timeout if
  it's given.
(hydra-timer): New var to hold the timer.
(hydra-timeout): New function to call `hydra-keyboard-quit' with delay.
(hydra-keyboard-quit): Cancel `hydra-timeout' timer.

Re #34.

hydra.el (hydra--format): Amend key regex

Recognize the '{' and '}' keys.

Don't wrap `hydra-repeat'

* hydra.el (hydra--delete-duplicates): Update.
(hydra--vconcat): Trim trailing spaces.

* hydra-test.el (hydra-red-error): Update test.
(hydra--table): Update test.

Add some features for generating tables

* hydra.el (hydra--pad): New defun.
(hydra--matrix): New defun.
(hydra--cell): New defun.
(hydra--vconcat): New defun.
(hydra-cell-format): New defcustom.
(hydra--table): New defun.
(hydra-reset-radios): New defun.
(defhydra): Allow docstring to be eval-able.
(defhydradio): Don't define `.../reset-radios', instead define
`.../names' that can be passed to `hydra-reset-radios'.
(hydra-multipop): New defmacro.
(hydra--radio): Update the order - the docstring is now a mandatory
second arg, value is the optional third.

* hydra-test.el (defhydradio): Update test.
(hydra--pad): Add test.
(hydra--matrix): Add test.
(hydra--cell): Add test.
(hydra--vconcat): Add test.
(hydra--table): Add test.

Add `hydra-repeat': hydra-specific `repeat'

* hydra.el (hydra-repeat): New defun.
(hydra-repeat--command): New defvar.
(hydra-repeat--prefix-arg): New defvar.

Example:

(defhydra hydra-vi ()
  "vi"
  ("h" backward-char)
  ("j" next-line)
  ("k" previous-line)
  ("l" forward-char)
  ("." hydra-repeat))
(global-set-key (kbd "C-v") 'hydra-vi/body)

"C-v 4l.." will result in movement forward by 4 chars 3 times: first
time from "4l", the other two from "..".

Fixes #59.

hydra.el (hydra--format): Amend key regex

Recognize the '=' key.

hydra.el (hydra-key-format-spec): set default to "%s"

* hydra-test.el (hydra-format): Update test.
(hydra-format-with-sexp): Update test.