Hide certain fstab mounts

Resolves #1359836

1 files changed, 4 insertions, 1 deletions

diff --git a/UCore.pas b/UCore.pas
index 4001007..5e102a0 100644
--- a/UCore.pas
+++ b/UCore.pas
@@ -2380,8 +2380,11 @@ begin
   //  Get mount name
   mntent := getmntent(fd);
   while mntent <> nil do begin
+    DebugMsg(['FillDefaultFstabMounterItems: found "', mntent^.mnt_dir, '" --> "', mntent^.mnt_fsname, '", fstype ', mntent^.mnt_type]);
     if (mntent^.mnt_dir <> '/') and (mntent^.mnt_dir <> '/boot') and (Pos('/proc', mntent^.mnt_dir) <> 1) and
-       (Pos('/dev', mntent^.mnt_dir) <> 1) and (mntent^.mnt_dir <> 'swap') and (mntent^.mnt_dir <> '') then
+       (Pos('/dev', mntent^.mnt_dir) <> 1) and (Pos('/sys', mntent^.mnt_dir) <> 1) and (mntent^.mnt_dir <> 'swap') and
+       (mntent^.mnt_type <> 'swap') and (mntent^.mnt_type <> 'rpc_pipefs') and (mntent^.mnt_type <> 'none') and
+       (mntent^.mnt_dir <> 'none') and (mntent^.mnt_dir <> '') then
     begin
       MounterItem := TMounterItem.Create;
       MounterItem.DisplayText := '';