io.standard-paths.windows: fix to use find-file-in-directories.

2017-03-05 15:58:59 -08:00 · 2017-03-05 15:58:59 -08:00 · 2ede9f09be
parent 495d27a502
commit 2ede9f09be
1 changed files with 1 additions and 1 deletions
--- a/basis/io/standard-paths/windows/windows.factor
+++ b/basis/io/standard-paths/windows/windows.factor
@ -15,7 +15,7 @@ IN: io.standard-paths.windows
 : find-in-program-files ( base-directory quot -- path )
    t swap [
        [ program-files-directories ] dip '[ _ append-path ] map
-    ] 2dip find-in-directories ; inline
+    ] 2dip find-file-in-directories ; inline

 M: windows find-in-applications
    >lower