From a7ed888cc820832b0f41e7d280c5fa38b103d9d8 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Fri, 31 Jul 2015 21:46:00 -0400 Subject: Set up outline-minor-mode for python and elisp --- lisp/init-elisp.el | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'lisp/init-elisp.el') diff --git a/lisp/init-elisp.el b/lisp/init-elisp.el index a6cee16..e35a53d 100644 --- a/lisp/init-elisp.el +++ b/lisp/init-elisp.el @@ -1,4 +1,15 @@ (add-hook 'emacs-lisp-mode-hook 'lispy-mode) +(add-hook 'emacs-lisp-mode-hook 'km/elisp-set-outline-vars) +;; This likely breaks lispy's outline functions, but I don't use them. +(add-hook 'lispy-mode-hook 'km/elisp-set-outline-vars) + +(defun km/elisp-outline-level () + (and (looking-at (concat "^" outline-regexp)) + (- (match-end 0) (match-beginning 0) 3))) + +(defun km/elisp-set-outline-vars () + (setq outline-regexp ";;;;* ") + (setq outline-level 'km/elisp-outline-level)) (provide 'init-elisp) -- cgit v1.2.3