diff --git a/basis/alien/libraries/finder/finder.factor b/basis/alien/libraries/finder/finder.factor index 70105052f1..3a763cf1b8 100644 --- a/basis/alien/libraries/finder/finder.factor +++ b/basis/alien/libraries/finder/finder.factor @@ -11,7 +11,7 @@ HOOK: find-library* os ( name -- path/f ) ! try to open a library that is the first name in that list anyway ! or "library_not_found" as a last resort for better debugging. : find-library-from-list ( seq -- path/f ) - dup [ find-library* ] map-find nip + dup [ find-library* ] map-find drop [ nip ] [ ?first "library_not_found" or ] if* ; {