diff options
| -rw-r--r-- | UEngines.pas | 4 | ||||
| -rw-r--r-- | UMain.pas | 3 |
2 files changed, 5 insertions, 2 deletions
diff --git a/UEngines.pas b/UEngines.pas index 66dd9ea..3db0c25 100644 --- a/UEngines.pas +++ b/UEngines.pas @@ -718,8 +718,8 @@ var Stat: Pstatfs64; FoundLength: integer; Buffer: array[0..31] of char; begin - FSSize := 0; - FSFree := 0; + FSSize := -1; + FSFree := -1; FSName := ''; try Stat := malloc(sizeof(Tstatfs64)); @@ -1950,6 +1950,9 @@ begin else s := RightPathLabel.Caption; CommandLineLabel.Caption := Format('%s@%s:%s>', [GetUserName, GetHostName, s]); LeftPanelEngine.GetFileSystemInfo(LeftPanelEngine.Path, FSSize, FSFree, FSName); + // *TODO: hide numbers if filesystem info cannot be determined + if FSSize < 0 then FSSize := 0; + if FSFree < 0 then FSFree := 0; if FSName <> '' then LeftDiskInfoLabel.Caption := Format(LANGDiskStatVolNameFmt, [FSName, FormatSize(FSFree, 1024), |
