Finish fixing the problem.
authorGuillermo J. Rozas <edu/mit/csail/zurich/gjr>
Fri, 25 Jun 1993 23:14:58 +0000 (23:14 +0000)
committerGuillermo J. Rozas <edu/mit/csail/zurich/gjr>
Fri, 25 Jun 1993 23:14:58 +0000 (23:14 +0000)
v7/src/runtime/packag.scm

index 83054ed95b2f85c4e7cdb3c0028302cf414a0bc1..737e5ee38122b49045aa528ca61918651779fee6 100644 (file)
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: packag.scm,v 14.15 1993/06/25 23:11:03 gjr Exp $
+$Id: packag.scm,v 14.16 1993/06/25 23:14:58 gjr Exp $
 
 Copyright (c) 1988-1993 Massachusetts Institute of Technology
 
@@ -191,7 +191,8 @@ MIT in each case. |#
                                    #\-
                                    #\_))))
                (value (prim name)))
-          (if load/suppress-loading-message?
+          (if (or (not value)
+                  load/suppress-loading-message?)
               value
               (let ((port (nearest-cmdl/port)))
                 (fresh-line port)