25 lines
837 B
EmacsLisp
25 lines
837 B
EmacsLisp
|
;;; funcs.el --- ESS Layer functions File
|
||
|
|
;;
|
||
|
|
;; Copyright (c) 2012-2017 Sylvain Benner & Contributors
|
||
|
|
;;
|
||
|
|
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
|
||
|
|
;; URL: https://github.com/syl20bnr/spacemacs
|
||
|
|
;;
|
||
|
|
;; This file is not part of GNU Emacs.
|
||
|
|
;;
|
||
|
|
;;; License: GPLv3
|
||
|
|
|
||
|
|
(defun spacemacs/ess-start-repl ()
|
||
|
|
"Start a REPL corresponding to the ess-language of the current buffer."
|
||
|
|
(interactive)
|
||
|
|
(cond
|
||
|
|
((string= "S" ess-language) (call-interactively 'R))
|
||
|
|
((string= "STA" ess-language) (call-interactively 'stata))
|
||
|
|
((string= "SAS" ess-language) (call-interactively 'SAS))))
|
||
|
|
|
||
|
|
(defun spacemacs//ess-fix-read-only-inferior-ess-mode ()
|
||
|
|
"Fixes a bug when `comint-prompt-read-only' in non-nil.
|
||
|
|
See https://github.com/emacs-ess/ESS/issues/300"
|
||
|
|
(setq-local comint-use-prompt-regexp nil)
|
||
|
|
(setq-local inhibit-field-text-motion nil))
|