From 2f569eda51713de29daf1ca331b5583357df10ec Mon Sep 17 00:00:00 2001
From: Henrik Lissner <henrik@lissner.net>
Date: Mon, 20 May 2019 21:40:48 -0400
Subject: [PATCH] Silence malformed function warnings from ivy-hydra

---
 modules/completion/ivy/autoload/hydras.el | 43 ++++++++++++-----------
 1 file changed, 22 insertions(+), 21 deletions(-)

diff --git a/modules/completion/ivy/autoload/hydras.el b/modules/completion/ivy/autoload/hydras.el
index afe09e393..5f0f45708 100644
--- a/modules/completion/ivy/autoload/hydras.el
+++ b/modules/completion/ivy/autoload/hydras.el
@@ -2,30 +2,31 @@
 
 ;;;###autoload
 (after! ivy-hydra
-  (defhydra+ hydra-ivy (:hint nil :color pink)
-    "
+  (with-no-warnings
+    (defhydra+ hydra-ivy (:hint nil :color pink)
+      "
  Move     ^^^^^^^^^^ | Call         ^^^^ | Cancel^^ | Options^^ | Action _w_/_s_/_a_: %s(ivy-action-name)
 ----------^^^^^^^^^^-+--------------^^^^-+-------^^-+--------^^-+---------------------------------
  _g_ ^ ^ _k_ ^ ^ _u_ | _f_orward _o_ccur | _i_nsert | _c_alling: %-7s(if ivy-calling \"on\" \"off\") _C_ase-fold: %-10`ivy-case-fold-search
  ^↨^ _h_ ^+^ _l_ ^↕^ | _RET_ done     ^^ | _q_uit   | _m_atcher: %-7s(ivy--matcher-desc) _t_runcate: %-11`truncate-lines
  _G_ ^ ^ _j_ ^ ^ _d_ | _TAB_ alt-done ^^ | ^ ^      | _<_/_>_: shrink/grow
 "
-    ;; arrows
-    ("l" ivy-alt-done)
-    ("h" ivy-backward-delete-char)
-    ("g" ivy-beginning-of-buffer)
-    ("G" ivy-end-of-buffer)
-    ("d" ivy-scroll-up-command)
-    ("u" ivy-scroll-down-command)
-    ("e" ivy-scroll-down-command)
-    ;; actions
-    ("q" keyboard-escape-quit :exit t)
-    ("<escape>" keyboard-escape-quit :exit t)
-    ("TAB" ivy-alt-done :exit nil)
-    ("RET" ivy-done :exit t)
-    ("C-SPC" ivy-call-and-recenter :exit nil)
-    ("f" ivy-call)
-    ("c" ivy-toggle-calling)
-    ("m" ivy-toggle-fuzzy)
-    ("t" (setq truncate-lines (not truncate-lines)))
-    ("o" ivy-occur :exit t)))
+      ;; arrows
+      ("l" ivy-alt-done)
+      ("h" ivy-backward-delete-char)
+      ("g" ivy-beginning-of-buffer)
+      ("G" ivy-end-of-buffer)
+      ("d" ivy-scroll-up-command)
+      ("u" ivy-scroll-down-command)
+      ("e" ivy-scroll-down-command)
+      ;; actions
+      ("q" keyboard-escape-quit :exit t)
+      ("<escape>" keyboard-escape-quit :exit t)
+      ("TAB" ivy-alt-done :exit nil)
+      ("RET" ivy-done :exit t)
+      ("C-SPC" ivy-call-and-recenter :exit nil)
+      ("f" ivy-call)
+      ("c" ivy-toggle-calling)
+      ("m" ivy-toggle-fuzzy)
+      ("t" (setq truncate-lines (not truncate-lines)))
+      ("o" ivy-occur :exit t))))