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

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

Fixes #93

diff --git a/hydra.el b/hydra.el
index 60e1e650c9bad79e9e98eaad5975e67bd2a2ac78..2c06c66e436cbbcad6be6fc880f95ae60f7e53c1 100644 (file)
--- a/hydra.el
+++ b/hydra.el
@@ -623,7 +623,7 @@ OTHER-POST is an optional extension to the :post key of BODY."
 
 (defun hydra-pink-fallback ()
   "On intercepting a non-head, try to run it."
-  (let ((keys (this-command-keys))
+  (let ((keys (this-single-command-keys))
         kb)
     (when (equal keys [backspace])
       (setq keys "\7f"))