Remove need for unnecessary register variable

This commit is contained in:
JappaWakka 2023-09-11 18:42:07 +02:00
parent 8d2eb864c1
commit 04f971e8df
1 changed files with 8 additions and 2 deletions

View File

@ -186,8 +186,14 @@
End If End If
End Sub End Sub
Public Shared Sub RemoveNPCData(ByVal file As String, ByVal ID As Integer, ByVal action As String, ByVal addition As String) Public Shared Sub RemoveNPCData(ByVal file As String, ByVal ID As Integer, ByVal action As String, Optional ByVal addition As String = "")
Dim Data As String = "{" & file & "|" & ID & "|" & action & "|" & addition & "}" Dim Data As String
If addition = "" Then
Data = "{" & file & "|" & ID & "|" & action & "}"
Else
Data = "{" & file & "|" & ID & "|" & action & "|" & addition & "}"
End If
Dim NData() As String = Core.Player.NPCData.SplitAtNewline() Dim NData() As String = Core.Player.NPCData.SplitAtNewline()
Dim nList As List(Of String) = NData.ToList() Dim nList As List(Of String) = NData.ToList()