From 896a24be34e157de742438d7338e8e2c6b840371 Mon Sep 17 00:00:00 2001
From: Jeremy Dormitzer <jeremydormitzer@lola.com>
Date: Mon, 23 Mar 2020 14:47:27 -0400
Subject: [PATCH] Integrate helpful.el

---
 emacs/init.org | 21 ++++++++++++++++-----
 1 file changed, 16 insertions(+), 5 deletions(-)

diff --git a/emacs/init.org b/emacs/init.org
index a16e276..0552fcd 100755
--- a/emacs/init.org
+++ b/emacs/init.org
@@ -431,11 +431,6 @@ Some helpful ELisp packages:
   (general-def '(normal motion) emacs-lisp-mode-map "C-c C-c" #'eval-defun :keymaps 'override)
   (general-def '(normal motion insert) lisp-interaction-mode-map "C-c C-c" #'eval-print-last-sexp :keymaps 'override)
   (add-hook 'ielm-mode-hook 'smartparens-strict-mode)
-  (add-hook 'emacs-lisp-mode-hook
-	    (lambda ()
-	      (set (make-local-variable 'evil-lookup-func)
-		   (lambda ()
-		     (describe-symbol (symbol-at-point))))))
 #+END_SRC
 
 ** Load path
@@ -5701,3 +5696,19 @@ to use instead:
       (setq sql-drill-program
 	    (expand-file-name "~/drill/apache-drill-1.17.0/bin/drill-embedded"))))
 #+END_SRC
+
+* Helpful
+A much-improved help buffer:
+#+BEGIN_SRC emacs-lisp
+  (use-package helpful
+    :defer t
+    :init
+    (setq counsel-describe-function-function #'helpful-callable
+	  counsel-describe-variable-function #'helpful-variable)
+    (add-hook 'emacs-lisp-mode-hook
+	      (lambda ()
+		(set (make-local-variable 'evil-lookup-func)
+		     #'helpful-at-point)))
+    :general
+    (help-map "k" #'helpful-key))
+#+END_SRC