Fix bug introduced in last edit.

diff --git a/v7/src/edwin/comman.scm b/v7/src/edwin/comman.scm
index b25718b4810137dd8f1ed6af033364e6b95b12e5..389081c26c09a8c5699d03f71a6bc3778f1e5b66 100644 (file)
--- a/v7/src/edwin/comman.scm
+++ b/v7/src/edwin/comman.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: comman.scm,v 1.72 1993/09/02 03:34:20 gjr Exp $
+$Id: comman.scm,v 1.73 1993/09/02 20:10:03 gjr Exp $
 
 Copyright (c) 1986, 1989-1993 Massachusetts Institute of Technology
 
@@ -340,7 +340,7 @@ of that license should have been included along with this file.
               (begin
                 (set! *doc-string-channel*
                       (file-open-input-channel
-                       (->namestring *external-doc-strings-file*)))
+                       (->namestring doc-strings)))
                 unspecific))))))
 
 (add-event-receiver! event:after-restart