From 13290f1c8f69cf45f6c0b621f4bec96df8fd7301 Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Thu, 11 Jun 2015 15:38:59 +0200
Subject: Emacs: Add imenu navigation for restclient files

---
 tag-emacs/emacs.d/init.el | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'tag-emacs')

diff --git a/tag-emacs/emacs.d/init.el b/tag-emacs/emacs.d/init.el
index 3c2cb60..49b0f07 100644
--- a/tag-emacs/emacs.d/init.el
+++ b/tag-emacs/emacs.d/init.el
@@ -1441,7 +1441,13 @@ symbol, not word, as I need this for programming the most."
   :mode ("\\.json\\'" . json-mode))
 
 (req-package restclient
-  :mode ("\\.api\\'" . restclient-mode))
+  :mode ("\\.api\\'" . restclient-mode)
+  :config (progn
+            (defun imenu-restclient-sections ()
+              (setq imenu-prev-index-position-function nil)
+              (add-to-list 'imenu-generic-expression '("Services" "^## ?\\(.+\\)$" 1) t)
+              (add-to-list 'imenu-generic-expression '("Calls" "^# ?\\(.+\\)$" 1) t))
+            (add-hook restclient-mode-hook #'imenu-restclient-sections)))
 
 (req-package tern
   :config (progn
-- 
cgit 1.4.1