From bc0363f06dbbfa507db09c368de0963c53ee5947 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Sat, 1 Aug 2015 00:23:45 -0400 Subject: Stop semantic from taking over elisp imenu --- lisp/init-elisp.el | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/lisp/init-elisp.el b/lisp/init-elisp.el index d8cfcdb..0807235 100644 --- a/lisp/init-elisp.el +++ b/lisp/init-elisp.el @@ -6,6 +6,13 @@ ;; This likely breaks lispy's outline functions, but I don't use them. (add-hook 'lispy-mode-hook 'km/elisp-set-outline-vars) +(after 'lispy + ;; This is ugly, but I haven't found another way to stop + ;; `imenu-create-index-function' from being set to + ;; `semantic-create-imenu-index'. Trying to set it in + ;; `emacs-lisp-mode-hook' or `lispy-mode-hook' doesn't work. + (defalias 'semantic-create-imenu-index 'imenu-default-create-index-function)) + (defun km/elisp-outline-level () (and (looking-at (concat "^" outline-regexp)) (- (match-end 0) (match-beginning 0) 3))) -- cgit v1.2.3