Cleaned up fix for issue #94

This commit is contained in:
MikeMaximus
2017-07-15 10:54:15 -06:00
parent d3d6482bfd
commit b5859d6541
+2 -3
View File
@@ -323,7 +323,7 @@ Public Class mgrCommon
End Function
'Get available disk space on a drive (Unix)
Private Shared Function GetAvailableDiskSpaceLinux(ByVal sPath As String) As Long
Private Shared Function GetAvailableDiskSpaceUnix(ByVal sPath As String) As Long
Dim prsdf As Process
Dim sOutput As String
Dim sAvailableSpace As String
@@ -343,7 +343,6 @@ Public Class mgrCommon
Catch
Return 0
End Try
Return 0
End Function
'Get available disk space on a drive (Windows)
@@ -362,7 +361,7 @@ Public Class mgrCommon
'Get available disk space on a drive
Public Shared Function GetAvailableDiskSpace(ByVal sPath As String) As Long
If IsUnix() Then
Return GetAvailableDiskSpaceLinux(sPath)
Return GetAvailableDiskSpaceUnix(sPath)
Else
Return GetAvailableDiskSpaceWindows(sPath)
End If