2018-02-10 02:11:42 -05:00
|
|
|
;;; lang/ess/config.el -*- lexical-binding: t; -*-
|
|
|
|
|
2018-09-10 22:36:37 -04:00
|
|
|
(def-package! ess
|
|
|
|
:commands (stata SAS)
|
2018-02-10 02:11:42 -05:00
|
|
|
:init
|
2018-08-09 22:33:44 +05:30
|
|
|
(setq ess-smart-S-assign-key nil)
|
2018-02-10 02:11:42 -05:00
|
|
|
(unless (featurep! :lang julia)
|
2018-06-23 16:48:58 +02:00
|
|
|
(add-to-list 'auto-mode-alist '("\\.jl\\'" . ess-julia-mode)))
|
2018-02-06 02:18:49 +08:00
|
|
|
:config
|
2018-02-18 22:44:57 -05:00
|
|
|
(setq ess-offset-continued 'straight
|
2018-02-06 02:18:49 +08:00
|
|
|
ess-expression-offset 2
|
|
|
|
ess-nuke-trailing-whitespace-p t
|
2019-02-15 19:38:49 -05:00
|
|
|
ess-default-style 'DEFAULT
|
|
|
|
ess-history-directory (expand-file-name "ess-history/" doom-cache-dir))
|
2018-09-10 22:39:11 -04:00
|
|
|
|
2019-02-15 19:38:49 -05:00
|
|
|
(set-repl-handler! '(ess-r-mode ess-julia-mode) #'+ess-repl-buffer)
|
|
|
|
(set-lookup-handlers! '(ess-r-mode ess-julia-mode)
|
|
|
|
:documentation #'ess-display-help-on-object)
|
2018-09-10 22:36:37 -04:00
|
|
|
|
2018-12-23 23:54:27 -05:00
|
|
|
(map! (:after ess-help
|
|
|
|
:map ess-doc-map
|
|
|
|
"h" #'ess-display-help-on-object
|
|
|
|
"p" #'ess-R-dv-pprint
|
|
|
|
"t" #'ess-R-dv-ctable
|
|
|
|
[C-return] #'ess-eval-line
|
|
|
|
[up] #'comint-next-input
|
|
|
|
[down] #'comint-previous-input)
|
|
|
|
|
2018-06-03 15:46:00 +02:00
|
|
|
:localleader
|
2018-12-23 23:54:27 -05:00
|
|
|
:map ess-mode-map
|
|
|
|
"," #'ess-eval-region-or-function-or-paragraph-and-step
|
|
|
|
"'" #'R
|
|
|
|
[tab] #'ess-switch-to-inferior-or-script-buffer
|
|
|
|
[backtab] #'ess-switch-process
|
|
|
|
;; REPL
|
|
|
|
"B" #'ess-eval-buffer-and-go
|
|
|
|
"b" #'ess-eval-buffer
|
|
|
|
"d" #'ess-eval-region-or-line-and-step
|
|
|
|
"D" #'ess-eval-function-or-paragraph-and-step
|
|
|
|
"L" #'ess-eval-line-and-go
|
|
|
|
"l" #'ess-eval-line
|
|
|
|
"R" #'ess-eval-region-and-go
|
|
|
|
"r" #'ess-eval-region
|
|
|
|
"F" #'ess-eval-function-and-go
|
|
|
|
"f" #'ess-eval-function
|
2018-06-03 15:46:00 +02:00
|
|
|
;; predefined keymaps
|
2019-02-15 20:24:35 -05:00
|
|
|
"h" 'ess-doc-map
|
|
|
|
"x" 'ess-extra-map
|
|
|
|
"p" 'ess-r-package-dev-map
|
|
|
|
"v" 'ess-dev-map
|
2018-06-03 15:46:00 +02:00
|
|
|
;; noweb
|
2018-12-23 23:54:27 -05:00
|
|
|
:prefix "c"
|
|
|
|
"C" #'ess-eval-chunk-and-go
|
|
|
|
"c" #'ess-eval-chunk
|
|
|
|
"d" #'ess-eval-chunk-and-step
|
|
|
|
"m" #'ess-noweb-mark-chunk
|
|
|
|
"p" #'ess-noweb-previous-chunk
|
|
|
|
"n" #'ess-noweb-next-chunk))
|