Index: /trunk/ccl/level-1/l1-init.lisp
===================================================================
--- /trunk/ccl/level-1/l1-init.lisp	(revision 500)
+++ /trunk/ccl/level-1/l1-init.lisp	(revision 501)
@@ -259,6 +259,5 @@
   "Holds list of names of modules that have been loaded thus far.
    The names are case sensitive strings.")
-(defvar *module-file-alist* nil
-  "Holds an alist of modules and associated pathnames known to the system.")
+