Skip to content
Snippets Groups Projects
Commit 5c7b0ed2 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

previos "typo" was a missing package prefix from earlier mass-removal.

parent 0c5b8d92
No related branches found
No related tags found
No related merge requests found
...@@ -143,7 +143,7 @@ to the base of the system." ...@@ -143,7 +143,7 @@ to the base of the system."
;;; XXX: nasty hack. ;;; XXX: nasty hack.
;;; Necessary to support asd files that weren't rewritten to use ;;; Necessary to support asd files that weren't rewritten to use
;;; instrumented-module/instrumented-cl-source-file classes. ;;; instrumented-module/instrumented-cl-source-file classes.
(defmethod module-default-component-class :around ((c module)) (defmethod asdf::module-default-component-class :around ((c module))
(let ((what-would-asdf-do (call-next-method))) (let ((what-would-asdf-do (call-next-method)))
(if (member what-would-asdf-do `(nil cl-source-file (if (member what-would-asdf-do `(nil cl-source-file
,(find-class 'cl-source-file))) ,(find-class 'cl-source-file)))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment