[ESS-bugs] ess-mode 15.09-devel [git: f0c5d8019ead3d8b206ca85f039f6a4841e8ac08]; .ess commands are visible in remote buffers

[Sam Steingold]

Hi,
I run R on a remote host using screen:
--8<---------------cut here---------------start------------->8---
;; http://stackoverflow.com/questions/16819248/emacs-tramp-over-an-unreliable-connection
(defvar R-remote-host "ds")
(defvar R-remote-screen "R")
(defun R-remote (&optional remote-host screen-name)
  "Connect to the remote-host's screen-name screen running R."
  (interactive (list
                (read-from-minibuffer "R remote host: " R-remote-host)
                (read-from-minibuffer "R remote screen name: " R-remote-screen)))
  (with-temp-buffer
    (call-process "ssh" nil t nil "-t" remote-host "screen" "-list" screen-name)
    (goto-char 0)
    (cond ((search-forward "There is a screen on" nil t)
           (message "Found %s on %s" screen-name remote-host))
          ((search-forward "No Sockets found" nil t)
           (message "Creating %s on %s" screen-name remote-host)
           (call-process "ssh" nil t nil "-t" remote-host "screen"
                         "-c" "/dev/null" "-d" "-m" "-S" screen-name
                         inferior-R-program-name "--no-readline"
                         inferior-R-args))
          (t (error "Cannot parse `screen -list` output: %s" (buffer-string)))))
  (pop-to-buffer (make-term (concat "remote-" screen-name)
                            "ssh" nil "-t" "-t" remote-host
                            "screen" "-c" "/dev/null"
                            "-D" "-r" screen-name))
  (ess-remote (process-name (get-buffer-process (current-buffer))) "R")
  (setq comint-process-echoes t))
--8<---------------cut here---------------end--------------->8---

alas, all I send to *remote-R* is echoed back to be, and also a lot of
ESS junk too, e.g.,

--8<---------------cut here---------------start------------->8---
> .ess_funargs("i").[62C 
> .ess_funargs("is.").[60C 
> .ess_funargs("is.h").[59C 
> .ess_funargs("is.hierarchical").[48C 
(list "igraph" '(("communities" . "") ("full" . "FALSE")) '("communities" "full"))
> .ess_funargs("w").[62C 
> .ess_funargs("str").[60C 
--8<---------------cut here---------------end--------------->8---

and

--8<---------------cut here---------------start------------->8---
The following objects are masked from ESSR (pos = 5):.ess_all_functions, .ess_arg_help, .ess_dbg_getTracedAndDebugged,.[65D
.ess_dbg_UndebugALL, .ess_dbg_UntraceOrUndebug, .ess_find_funcs,.[64D
.ess_funargs, .ess_get_completions, .ess_knit, .ess_log_eval,.[61D
.ess_package_attached, .ess_sweave, .ess_vignettes,.[51D
.ess_watch_assign_expressions, .ess_watch_eval,.[47D
.ess_watch_expressions, .ess_weave, .ess.ESSRversion, .ess.eval,.[64D
.ess.findFUN, .ess.getHelpAliases, .ess.help, .ess.helpFUN,.[59D
.ess.R.has.utils, .ess.Rversion, .ess.source, .ess.sourceFUN,.[61D
.ess.utils.name, .ESSBP., .essDev_assign, .essDev_differs,.[58D
.essDev_evalSource, .essDev_identicalClass, .essDev_insertMethods,.[66D
.essDev_source, .essDev.eval, htsummary
--8<---------------cut here---------------end--------------->8---

How to I disable this echo?


Emacs  : GNU Emacs 25.0.50.8 (x86_64-apple-darwin14.3.0, NS appkit-1347.57 Version 10.10.3 (Build 14D136))
 of 2015-04-20 on sds-MacBook-Pro.local
Package: ess-mode 15.09-devel [git: f0c5d8019ead3d8b206ca85f039f6a4841e8ac08]

current state:
==============
(setq
 ess-language "S"
 ess-dialect "R"
 ess-ask-for-ess-directory nil
 ess-ask-about-transfile nil
 ess-directory nil
 ess-keep-dump-files "always"
 ess-source-directory "/var/folders/5k/3w_vc1qs6pv4k3wvnrwr_5100000gn/T/"
 ess-use-ido t
 ess-use-eldoc t
 ess-use-tracebug t
 ess-use-auto-complete t
 ess-use-company t
 ess-eval-visibly-p 'nowait
 ess-can-eval-in-background nil
 ess-local-process-name "R"
 )
-- 
Sam Steingold (http://sds.podval.org/) on darwin Ns 10.3.1347
http://www.childpsy.net/ http://islamexposedonline.com http://mideasttruth.com
http://americancensorship.org http://camera.org http://www.dhimmitude.org
If you cannot improve on silence, keep it.