- (add-hook 'ess-mode-hook
- '(lambda ()
- (local-set-key (kbd "C-c C-R")
- 'dla/ess-region-remote-eval)))
-
+ (defun dla/ess-region-remote-eval (start end)
+ "Evaluate region in a remote ESS instance"
+ (interactive "r")
+ (shell-command-on-region start end "eval_r" (get-buffer-create "***essregionremoteeval***"))
+ kill-buffer "***essregionremoteeval***")