Add new escape sequence which tells Emacs to change the working

directory of the Scheme process buffer.

diff --git a/etc/xscheme.el b/etc/xscheme.el
index 78dfc0aaa135e8bb7bc0d0551279910d1f07ed2b..206cad06279d680631f3fa3628faffe38f7bfed3 100644 (file)
--- a/etc/xscheme.el
+++ b/etc/xscheme.el
@@ -21,7 +21,7 @@
 ;;; Requires C-Scheme release 5 or later
 ;;; Changes to Control-G handler require runtime version 13.85 or later
 
-;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/xscheme.el,v 1.17 1988/04/28 18:52:03 cph Exp $
+;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/xscheme.el,v 1.18 1988/06/07 16:43:10 cph Exp $
 
 (require 'scheme)
 \f
@@ -734,6 +734,8 @@ When called, the current buffer will be the Scheme process-buffer.")
        xscheme-process-filter:simple-action)
     (?v xscheme-write-value
        xscheme-process-filter:string-action)
+    (?w cd
+       xscheme-process-filter:string-action)
     (?z xscheme-display-process-buffer
        xscheme-process-filter:simple-action)
     (?c xscheme-unsolicited-read-char