Function: global-set-scheme-interaction-buffer
global-set-scheme-interaction-buffer is an interactive and
byte-compiled function defined in xscheme.el.gz.
Signature
(global-set-scheme-interaction-buffer BUFFER-NAME)
Documentation
Set the default scheme interaction buffer.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/progmodes/xscheme.el.gz
(defun global-set-scheme-interaction-buffer (buffer-name)
"Set the default scheme interaction buffer."
(interactive
(list (read-buffer "Scheme interaction buffer: "
xscheme-buffer-name
t)))
(let ((process-name (xscheme-verify-buffer buffer-name nil)))
(setq-default xscheme-buffer-name buffer-name)
(setq-default xscheme-process-name process-name)
(setq-default xscheme-runlight-string
(with-current-buffer buffer-name
xscheme-runlight-string))
(setq-default xscheme-runlight
(if (eq (process-status process-name) 'run)
xscheme-default-runlight
""))))