From 6dbc95dfdea4c3a633b77783ea8fbcff96d304b7 Mon Sep 17 00:00:00 2001
From: Kyle Meyer <kyle@kyleam.com>
Date: Tue, 9 May 2017 22:51:39 -0400
Subject: scheme: Add 'define-public' to imenu expression

---
 init.el | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/init.el b/init.el
index 9e7e0d7..d7c5117 100644
--- a/init.el
+++ b/init.el
@@ -1929,6 +1929,16 @@
   :config
   (define-key geiser-mode-map (kbd "C-.") nil))
 
+(use-package scheme
+  :defer
+  :config
+  (add-hook 'scheme-mode-hook
+            (lambda ()
+              (setq imenu-generic-expression
+                    (cons (list nil
+                                "^(define-public\\s-+\\(\\sw+\\)" 1)
+                          imenu-generic-expression)))))
+
 (use-package python
   :defer t
   :init
-- 
cgit v1.2.3