alien.libraries.finder: How many patches does it take... I was dropping the wrong value from map-find.

db4
Doug Coleman 2014-07-08 11:58:34 -07:00
parent 710a7c1a21
commit d578ca7959
1 changed files with 1 additions and 1 deletions

View File

@ -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* ;
{