Fix typo.

diff --git a/v7/src/edwin/edwin.ldr b/v7/src/edwin/edwin.ldr
index 75ca0b38fd29aa99c35a0f123bb1fc664d48c6d3..ffef643471b8274aaebd0cf4c6590872d47ae89b 100644 (file)
--- a/v7/src/edwin/edwin.ldr
+++ b/v7/src/edwin/edwin.ldr
@@ -1,5 +1,5 @@
 ;;; -*-Scheme-*-
-;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/edwin.ldr,v 1.20 1991/11/26 20:10:15 markf Exp $
+;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/edwin.ldr,v 1.21 1991/11/26 22:23:53 cph Exp $
 ;;; program to load package contents
 ;;; **** This program (unlike most .ldr files) is not generated by a program.
 
@@ -122,8 +122,7 @@
     (load "modefs" environment)
     (load "rename" environment)
     (load "loadef" environment)
-    (let ((env (->environment '(EDWIN BOCSHER))))
+    (let ((env (->environment '(EDWIN BOCHSER))))
       (load "bochser" env)
       (load "bochsmod" env)
-      ((access initialize-bochser-mode! env)))    
-    ))
+      ((access initialize-bochser-mode! env)))))
\ No newline at end of file