From 8fc7e301a30f3e984c31a68d5d15eaf34a63ec48 Mon Sep 17 00:00:00 2001
From: Correl Roush <croush@coredial.com>
Date: Wed, 22 Apr 2015 10:27:55 -0400
Subject: [PATCH] [emacs] Apply lisp setup to minibuffer eval

---
 .emacs.d/emacs.org | 24 ++++++++++++++----------
 1 file changed, 14 insertions(+), 10 deletions(-)

diff --git a/.emacs.d/emacs.org b/.emacs.d/emacs.org
index 7bf3757..116dfe4 100644
--- a/.emacs.d/emacs.org
+++ b/.emacs.d/emacs.org
@@ -425,16 +425,20 @@ A modern list api for Emacs. No 'cl required.
   (use-package rainbow-delimiters
     :ensure t)
 
-  (mapc (lambda (lisp)
-          (let ((mode-hook (intern (concat lisp "-mode-hook"))))
-            (message (format "Installing LISP mode hook for %S" lisp))
-            (add-hook mode-hook (lambda ()
-                                  (show-paren-mode t)
-                                  (electric-indent-mode t)
-                                  (paredit-mode t)
-                                  (rainbow-delimiters-mode t)
-                                  (rainbow-identifiers-mode t)))))
-        (mapcar 'car (cddr '<<lisps()>>)))
+  (let ((lisp-mode-hooks
+         (mapcar (lambda (lisp)
+                   (intern (concat lisp "-mode-hook")))
+                 (mapcar 'car (cddr '<<lisps()>>)))))
+    (mapc (lambda (hook)
+            (message (format "Installing LISP mode hook for %S" hook))
+            (add-hook hook (lambda ()
+                             (show-paren-mode t)
+                             (electric-indent-mode t)
+                             (paredit-mode t)
+                             (rainbow-delimiters-mode t)
+                             (rainbow-identifiers-mode t))))
+          (cons 'eval-expression-minibuffer-setup-hook
+                lisp-mode-hooks)))
 #+END_SRC
 *** Lisp-Flavored Erlang
 #+name: programming