Added some files that are not really CLASSIFIED
This commit is contained in:
parent
6d03ba1373
commit
1b5e61ce70
|
@ -71,7 +71,7 @@
|
|||
|
||||
Private Sub GetVersionData()
|
||||
Dim w As New System.Net.WebClient
|
||||
Dim data As String = w.DownloadString("") ' CLASSIFIED
|
||||
Dim data As String = w.DownloadString("https://raw.githubusercontent.com/P3D-Legacy/P3D-Legacy-Data/master/GTSVersion.dat")
|
||||
Dim lines() As String = data.SplitAtNewline()
|
||||
GTSVersion = lines(0)
|
||||
|
||||
|
|
|
@ -436,8 +436,8 @@ Namespace GameJolt
|
|||
Private Sub DownloadBanList()
|
||||
Try
|
||||
Dim w As New System.Net.WebClient
|
||||
BanList = w.DownloadString("") ' CLASSIFIED
|
||||
BanReasons = w.DownloadString("") ' CLASSIFIED
|
||||
BanList = w.DownloadString("https://raw.githubusercontent.com/P3D-Legacy/P3D-Legacy-Data/master/banlist.dat")
|
||||
BanReasons = w.DownloadString("https://raw.githubusercontent.com/P3D-Legacy/P3D-Legacy-Data/master/banreasons.dat")
|
||||
Logger.Log(Logger.LogTypes.Message, "Retrieved ban list data.")
|
||||
Me.DownloadedBanList = True
|
||||
Catch ex As Exception
|
||||
|
|
|
@ -77,7 +77,7 @@
|
|||
|
||||
Try
|
||||
Dim w As New System.Net.WebClient
|
||||
Dim data() As String = w.DownloadString("").SplitAtNewline() ' CLASSIFIED
|
||||
Dim data() As String = w.DownloadString("https://raw.githubusercontent.com/P3D-Legacy/P3D-Legacy-Data/master/Events.txt").SplitAtNewline()
|
||||
|
||||
For Each line As String In data
|
||||
If line.Contains("|") = True Then
|
||||
|
|
Loading…
Reference in New Issue