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