Echoing behaviour in Emacs 21.1.1
Rich Heiberger
rmh at surfer.sbm.temple.edu
Fri Feb 1 23:38:03 CET 2002
Yes, emacs 21 changed some definitions and we had to respond.
The changes are in ess-5.1.20 (real soon now). Until then,
Place the following in your .emacs, immediately after
the
(require 'ess-site)
or
(load-file "ess-site.el")
line
(defun inferior-R-input-sender (proc string)
;; REALLY only for debugging: this S_L_O_W_S D_O_W_N [here AND below]
;;(ess-write-to-dribble-buffer (format "(inf..-R-..): string=«%s»; " string))
;; rmh: 2002-01-12 catch page() in R
(let ((help-string (or (string-match inferior-R-1-input-help string)
(string-match inferior-R-2-input-help string)))
(page-string (string-match inferior-R-page string)))
(if (or help-string page-string)
(let* ((string2 (match-string 2 string))
(string2-rt (concat string2 ".rt")))
;; (ess-write-to-dribble-buffer (format " new string=«%s»\n" string2))
(beginning-of-line)
(if (looking-at inferior-ess-primary-prompt)
(progn
(end-of-line)
(insert-before-markers string)) ;; emacs 21.0.105 and older
(delete-backward-char 1)) ;; emacs 21.0.106 and newer
(if page-string
(progn
(ess-command (concat string2 "\n")
(get-buffer-create (concat string2 ".rt")))
(ess-eval-linewise "\n")
(switch-to-buffer-other-window string2-rt)
(R-transcript-mode))
(ess-display-help-on-object
(if (string= string2 "") "help" string2))
(ess-eval-linewise "\n")))
;; else: normal command
(inferior-ess-input-sender proc string))))
In case you actually want to know what happened, the relevant change is in
the lines marked
;; emacs 21.0.106 and newer
Rich
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
ess-help mailing list -- To (un)subscribe, send
subscribe or unsubscribe
(in the "body", not the subject !) To: ess-help-request at stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._
More information about the ESS-help
mailing list