typo in io.files.info.windows

2009-11-07 22:23:39 -06:00 · 2009-11-07 22:23:39 -06:00 · 138cdeff54
parent 44109900de
commit 138cdeff54
1 changed files with 1 additions and 1 deletions
--- a/basis/io/files/info/windows/windows.factor
+++ b/basis/io/files/info/windows/windows.factor
@ -177,7 +177,7 @@ M: winnt file-system-info ( path -- file-system-info )
    handle buf buf-length FindNextVolume :> ret
    ret 0 = [
        GetLastError ERROR_NO_MORE_FILES =
-        [ drop f ] [ win32-error-string throw ] if
+        [ f ] [ win32-error-string throw ] if
    ] [
        buf utf16n alien>string
    ] if ;