mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

ADD: try..except to GetAllDrives function under Linux

Browse source
This commit is contained in:
Alexander Koblov 2009-04-16 19:33:26 +00:00
commit ed72bf509d
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
uOSUtils.pas
View file

@ -737,7 +737,7 @@ var
begin
Result := TList.Create;
for I:= Low(MntEntFileList) to High(MntEntFileList) do
begin
try
fstab:= setmntent(MntEntFileList[I],'r');
if not Assigned(fstab) then exit;
pme:= getmntent(fstab);
@ -765,6 +765,8 @@ begin
pme:= getmntent(fstab);
end;
endmntent(fstab);
except
DebugLn('Error with ', MntEntFileList[I]);
end;
end;
{$ENDIF}