diff options
author | Kyle Meyer <kyle@kyleam.com> | 2015-08-01 00:23:45 -0400 |
---|---|---|
committer | Kyle Meyer <kyle@kyleam.com> | 2015-08-01 00:23:45 -0400 |
commit | bc0363f06dbbfa507db09c368de0963c53ee5947 (patch) | |
tree | 38a25d1f2afbc983a3c93c853ade05130771f0e9 | |
parent | 8f2ac819601cdbc17deba14d47eff9f1c0551412 (diff) | |
download | emacs.d-bc0363f06dbbfa507db09c368de0963c53ee5947.tar.gz |
Stop semantic from taking over elisp imenu
-rw-r--r-- | lisp/init-elisp.el | 7 |
1 files changed, 7 insertions, 0 deletions
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))) |