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)))))))))))