Remove need for unnecessary register variable
This commit is contained in:
parent
8d2eb864c1
commit
04f971e8df
|
@ -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()
|
||||||
|
|
Loading…
Reference in New Issue