X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=emacs_el%2Fconfiguration%2Fess_configuration.el;h=7335cd460c975f567968fadc809b5e30117fa0d0;hb=70b15fb682d7793acb9b80816f0dbf4c255c0e64;hp=7e19f08b5444785ca56110077e4994ef52c5648d;hpb=37fd54fcd60c1be54d292772d8d4d40764fdb263;p=lib.git diff --git a/emacs_el/configuration/ess_configuration.el b/emacs_el/configuration/ess_configuration.el index 7e19f08..7335cd4 100644 --- a/emacs_el/configuration/ess_configuration.el +++ b/emacs_el/configuration/ess_configuration.el @@ -1,37 +1,12 @@ -(eval-after-load "ess" - '(mapcar 'ess-noweb-make-variable-permanent-local - '(ess-noweb-mode - ess-local-process-name ;; also made permanent in ess-mode, but let it be - ess-dialect - ess-language - ess-noweb-narrowing - ess-noweb-chunk-vector - ess-noweb-doc-mode - ess-noweb-code-mode - ess-noweb-default-code-mode - ess-noweb-last-chunk-index))) - -(defun ess-change-directory (path) - "Set the current working directory to PATH for both *R* and Emacs." - (interactive "DDirectory to change to: ") - - (when (file-exists-p path) - (ess-command (concat "setwd(\"" path "\")\n")) - ;; use file-name-as-directory to ensure it has trailing / - (setq default-directory (file-name-as-directory path)))) -(add-hook 'ess-mode-hook 'flyspell-prog-mode) -;;; 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 () - (cond ((looking-at "^##### ") 1) - ((looking-at "^#### ") 2) - ((looking-at "^[a-zA-Z0-9_\.]+ ?<- ?function(.*{") 3) - (t 1000))) - )) -(add-hook 'ess-mode-hook - '(lambda () - (local-set-key (kbd "C-c C-R") - 'dla/ess-region-remote-eval))) +; (eval-after-load "ess" +; '(mapcar 'ess-noweb-make-variable-permanent-local +; '(ess-noweb-mode +; ess-local-process-name ;; also made permanent in ess-mode, but let it be +; ess-dialect +; ess-language +; ess-noweb-narrowing +; ess-noweb-chunk-vector +; ess-noweb-doc-mode +; ess-noweb-code-mode +; ess-noweb-default-code-mode +; ess-noweb-last-chunk-index)))