typo in io.files.info.windows

2009-11-07 22:23:39 -06:00 · 2009-11-07 22:23:39 -06:00 · bd36fbb886
parent 1f327d8896
commit bd36fbb886
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 ;