diff --git a/collects/mzlib/foreign.ss b/collects/mzlib/foreign.ss
index 22430fe478..c8077790c7 100644
--- a/collects/mzlib/foreign.ss
+++ b/collects/mzlib/foreign.ss
@@ -217,7 +217,7 @@
    [(name lib type) (get-ffi-obj* name lib type #f)]
    [(name lib type failure)
     (let ([name (get-ffi-obj-name 'get-ffi-obj name)]
-          [lib  (get-ffi-lib lib)])
+          [lib  (get-ffi-lib-internal lib)])
       (let-values ([(obj error?)
                     (with-handlers
                         ([exn:fail:filesystem?