X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/b0e21f8370fb60321f178572e2b90dfc4e2eb5b6..e05aabbb81cddec46b3d9da802f632c3b20c67d1:/src/module-parse.lisp

diff --git a/src/module-parse.lisp b/src/module-parse.lisp
index df058be..311206d 100644
--- a/src/module-parse.lisp
+++ b/src/module-parse.lisp
@@ -156,6 +156,7 @@
 							    :truename true)))
 				   (when module
 				     (module-import module)
+				     (pushnew path (module-files *module*))
 				     (pushnew module
 					      (module-dependencies
 					       *module*))))
@@ -170,7 +171,9 @@
 		   (common name "LISP" "Lisp file"
 			   (lambda (path true)
 			     (handler-case
-				 (load true :verbose nil :print nil)
+				 (progn
+				   (pushnew path (module-files *module*))
+				   (load true :verbose nil :print nil))
 			       (error (error)
 				 (cerror* "Error loading Lisp file ~S: ~A"
 					  path error)))))))))))