Add option to skip only hidden files in file enumeration (not system folders)

vincentremond · vincentremond · commit 29e1b6a665f7 · 2025-06-06T21:55:31.000+02:00
diff --git a/extLauncher/Infra.fs b/extLauncher/Infra.fs
@@ -27,7 +27,8 @@ module IO =
                 EnumerationOptions(
                     RecurseSubdirectories = true,
                     IgnoreInaccessible = true,
-                    MatchType = MatchType.Simple
+                    MatchType = MatchType.Simple,
+                    AttributesToSkip = FileAttributes.Hidden
                 )
             )
         | RegexPattern pattern ->
@@ -39,7 +40,8 @@ module IO =
                 EnumerationOptions(
                     RecurseSubdirectories = true,
                     IgnoreInaccessible = true,
-                    MatchType = MatchType.Simple
+                    MatchType = MatchType.Simple,
+                    AttributesToSkip = FileAttributes.Hidden
                 )
             )
             |> Seq.filter (Path.GetFileName >> regex.IsMatch)

Original file line number	Diff line number	Diff line change
`@@ -27,7 +27,8 @@ module IO =`
`27`	`27`	`EnumerationOptions(`
`28`	`28`	`RecurseSubdirectories = true,`
`29`	`29`	`IgnoreInaccessible = true,`
`30`		`- MatchType = MatchType.Simple`
	`30`	`+ MatchType = MatchType.Simple,`
	`31`	`+ AttributesToSkip = FileAttributes.Hidden`
`31`	`32`	`)`
`32`	`33`	`)`
`33`	`34`	`\| RegexPattern pattern ->`
`@@ -39,7 +40,8 @@ module IO =`
`39`	`40`	`EnumerationOptions(`
`40`	`41`	`RecurseSubdirectories = true,`
`41`	`42`	`IgnoreInaccessible = true,`
`42`		`- MatchType = MatchType.Simple`
	`43`	`+ MatchType = MatchType.Simple,`
	`44`	`+ AttributesToSkip = FileAttributes.Hidden`
`43`	`45`	`)`
`44`	`46`	`)`
`45`	`47`	`\|> Seq.filter (Path.GetFileName >> regex.IsMatch)`