lang/ess: fix repl & doc lookup in ESS R/Julia

Also moves history files into doom-cache-dir

modules/lang/ess/autoload.el

@@ -1,7 +1,11 @@
 ;;; lang/ess/autoload.el -*- lexical-binding: t; -*-
 
 ;;;###autoload
-(defun +ess/r-repl ()
+(defun +ess-repl-buffer (&optional start-args)
-  "Open the R REPL."
+  "Returns an R/Julia REPL buffer."
-  (interactive)
+  (interactive "P")
-  (inferior-ess nil nil t))
+  (pcase major-mode
+    ('ess-r-mode (run-ess-r start-args))
+    ((or 'julia-mode 'ess-julia-mode) (run-julia start-args))
+    (_ (inferior-ess nil nil t)))
+  (current-buffer))

modules/lang/ess/config.el

@@ -10,12 +10,14 @@
   (setq ess-offset-continued 'straight
         ess-expression-offset 2
         ess-nuke-trailing-whitespace-p t
-        ess-default-style 'DEFAULT)
+        ess-default-style 'DEFAULT
+        ess-history-directory (expand-file-name "ess-history/" doom-cache-dir))
 
   (add-hook 'ess-mode-hook #'display-line-numbers-mode)
 
-  (set-repl-handler! 'ess-mode #'+ess/r-repl)
+  (set-repl-handler! '(ess-r-mode ess-julia-mode) #'+ess-repl-buffer)
-  (set-lookup-handlers! 'ess-mode :documentation #'ess-display-help-on-object)
+  (set-lookup-handlers! '(ess-r-mode ess-julia-mode)
+    :documentation #'ess-display-help-on-object)
 
   (map! (:after ess-help
           :map ess-doc-map
@@ -44,10 +46,10 @@
         "F" #'ess-eval-function-and-go
         "f" #'ess-eval-function
         ;; predefined keymaps
-        "h" #'ess-doc-map
+        "h" ess-doc-map
-        "x" #'ess-extra-map
+        "x" ess-extra-map
-        "p" #'ess-r-package-dev-map
+        "p" ess-r-package-dev-map
-        "v" #'ess-dev-map
+        "v" ess-dev-map
         ;; noweb
         :prefix "c"
         "C" #'ess-eval-chunk-and-go