From 32b4d58f31a89f1f9b2cec3e8b029c135ad353c8 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Wed, 15 Sep 2010 00:43:45 +0000 Subject: [PATCH] * update emacs --- .emacs | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/.emacs b/.emacs index abf0761..1a9953d 100644 --- a/.emacs +++ b/.emacs @@ -274,7 +274,17 @@ (add-hook 'c-mode-common-hook 'flyspell-prog-mode) (add-hook 'cperl-mode-hook 'flyspell-prog-mode) (add-hook 'tcl-mode-hook 'flyspell-prog-mode) +(add-hook 'ess-mode-hook 'flyspell-prog-mode) (defun turn-on-flyspell () "Force flyspell-mode on using a positive arg. For use in hooks." (interactive) - (flyspell-mode 1)) \ No newline at end of file + (flyspell-mode 1)) + +;;; outlining support for ess modes +(add-hook 'ess-mode-hook + '(lambda () + (outline-minor-mode) + (setq outline-regexp "\\(^#\\{4,5\\} \\)\\|\\(^[a-zA-Z0-9_\.]+ ?<- ?function(.*{\\)") + (defun outline-level + (lambda () (interactive) (cond ((looking-at "^##### ") 1)((looking-at "^#### ") 2)((looking-at "^[a-zA-Z0-9_\.]+ ?<- ?function(.*{") 3) (t 1000))) + ))) \ No newline at end of file -- 2.39.2