[elpa] master d25e560 03/72: Fix head color for heads with nil as HINT

[Oleh Krehel]

branch: master
commit d25e56045fcd85cdeff735af71a0fd023ba21464
Author: Oleh Krehel <ohwoeo...@gmail.com>
Commit: Oleh Krehel <ohwoeo...@gmail.com>

    Fix head color for heads with nil as HINT
    
    hydra.el (hydra--head-property): Fix.
    
    This head should work now:
    
        ("1" (text-scale-set 0) nil :bind nil :color blue)
---
 hydra.el |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/hydra.el b/hydra.el
index 95a34af..f57c9d3 100644
--- a/hydra.el
+++ b/hydra.el
@@ -190,7 +190,8 @@ should be a single statement. Wrap it in an interactive 
lambda."
 (defun hydra--head-property (h prop &optional default)
   "Return for Hydra head H the value of property PROP.
 Return DEFAULT if PROP is not in H."
-  (let ((plist (if (stringp (cl-caddr h))
+  (let ((plist (if (or (stringp (cl-caddr h))
+                       (null (cl-caddr h)))
                    (cl-cdddr h)
                  (cddr h))))
     (if (memq prop h)