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 Sub
Public Shared Sub RemoveNPCData(ByVal file As String, ByVal ID As Integer, ByVal action As String, ByVal addition As String)
Dim Data As String = "{" & file & "|" & ID & "|" & action & "|" & addition & "}"
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
If addition = "" Then
Data = "{" & file & "|" & ID & "|" & action & "}"
Else
Data = "{" & file & "|" & ID & "|" & action & "|" & addition & "}"
End If
Dim NData() As String = Core.Player.NPCData.SplitAtNewline()
Dim nList As List(Of String) = NData.ToList()