Eliminate reference to SYNTAX-TABLE/SYSTEM-INTERNAL.

diff --git a/v7/src/edwin/edwin.sf b/v7/src/edwin/edwin.sf
index c2182e90260c64eeef71812ac0de95a59f7b56f1..e67d2b58a93ea20430e678a66d2088ead5dc11e1 100644 (file)
--- a/v7/src/edwin/edwin.sf
+++ b/v7/src/edwin/edwin.sf
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: edwin.sf,v 1.28 2001/12/18 21:42:23 cph Exp $
+;;; $Id: edwin.sf,v 1.29 2001/12/18 21:57:13 cph Exp $
 ;;;
 ;;; Copyright (c) 1991-2001 Massachusetts Institute of Technology
 ;;;
@@ -32,8 +32,7 @@
     (begin
       (let ((sf-and-load
             (lambda (files package)
-              (fluid-let ((sf/default-syntax-table
-                           syntax-table/system-internal))
+              (fluid-let ((sf/default-syntax-table (->environment '())))
                 (sf-conditionally files))
               (for-each (lambda (file)
                           (load (string-append file ".bin") package))