X-Git-Url: https://git.donarmstrong.com/?p=home-base.git;a=blobdiff_plain;f=.emacs;fp=.emacs;h=dd536b0d987fe731f5933397dff244669fc7938a;hp=e16f95b0573e66472e944f4d87f76b219a54f000;hb=c181dff40548923568ef655a6ea1e2c4fe2ae608;hpb=cc8cafbe0fb6813bbf296592da0b37f5f0681966 diff --git a/.emacs b/.emacs index e16f95b..dd536b0 100644 --- a/.emacs +++ b/.emacs @@ -282,9 +282,9 @@ ;;; 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))) + '(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