diff --git a/.local/share/common-lisp/source/ambrevar/shell.lisp b/.local/share/common-lisp/source/ambrevar/shell.lisp
index 490d0bc9..e83476ae 100644
--- a/.local/share/common-lisp/source/ambrevar/shell.lisp
+++ b/.local/share/common-lisp/source/ambrevar/shell.lisp
@@ -120,7 +120,7 @@ Useful for `walk'."
 (export-always 'match-elf-library)
 (defun match-elf-library ()
   (lambda (file)
-    (ppcre:scan "application/x-sharedlib" (first (file-type file)))))
+    (ppcre:scan "application/x-sharedlib" (first (file-mime-type file)))))
 
 (export-always '*finder-include-directories*)
 (defvar *finder-include-directories* t