Updated default path

This commit is contained in:
moosecrab 2021-05-10 19:50:56 -07:00
parent 33595fdfeb
commit 0c1b8ec388

View File

@ -139,7 +139,7 @@
Dim rulelist As New List(Of rule)
Sub Main()
Dim dir As String = "V:\4chan\gf"
Dim dir As String = Environment.CurrentDirectory
Console.WriteLine("Enumerating files...")
For Each f In FileIO.FileSystem.GetFiles(dir, FileIO.SearchOption.SearchAllSubDirectories).ToList
allfilelist.Add(New fileobj(f))