diff --git a/test/test-source-file-type.script b/test/test-source-file-type.script
index 720231fb3da98eb108ee2078000546fd838ffebe..122e6c08c07db1c7a9abf4a4763a9d392682a9f3 100644
--- a/test/test-source-file-type.script
+++ b/test/test-source-file-type.script
@@ -13,7 +13,7 @@
   (assert
    (equalp (mapcar #'pathname-type
                   (mapcar #'asdf:component-pathname (asdf:module-components (asdf:find-system :test-source-file-type-1))))
-          '("cl" "cl")))
+          '("lisp" "cl")))
   (set sym nil)
   (asdf:load-system 'test-source-file-type-2 :verbose t)
   (assert (symbol-value sym))))